---

Hej,

Har nu prøvet flere metoder til at flette følgende sammen:

strNavn = rs("Stilling")
strLink = "<a href=""stilling.asp?stilling=" & _
rs("Stilling") & """>" & strNavn & "</a>"
Response.Write "<td class=""td"">" & strLink & "</td>" & vbcrlf

Her henter jeg stilling i db og laver et link, hvis jeg ikke have link ville
jeg have lavet det på denne måde:

Response.Write "<td class=""td"">"
If rs("Stilling") = "" Or IsNull(rs("Stilling")) Then
Response.Write("-------")
Else
Response.Write (rs("Stilling"))
End If
Response.Write "</td>" & vbcrlf

Hvordan kan jeg flette de to sammen, så jeg stadig har et link og en if....
hvis stilling er tom i db?

Mvh.
Henrik

---

Henrik Nielsen wrote in dk.edb.internet.webdesign.serverside.asp:
> Hvordan kan jeg flette de to sammen, så jeg stadig har et link og en if....
> hvis stilling er tom i db?

Hvis jeg forstår dig rigtigt kan du gøre sådan her.

Ellers skriv igen.


Response.Write "<td class=""td"">"
If rs("Stilling") = "" Or IsNull(rs("Stilling")) Then
Response.Write("-------")
Else
strNavn = rs("Stilling")
strLink = "<a href=""stilling.asp?stilling=" & _
rs("Stilling") & """>" & strNavn & "</a>"
Response.Write "<td class=""td"">" & strLink & "</td>" & vbcrlf
End If
Response.Write "</td>" & vbcrlf

--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

---

> Hvis jeg forstår dig rigtigt kan du gøre sådan her.
>
> Ellers skriv igen.
>
>
> Response.Write "<td class=""td"">"
> If rs("Stilling") = "" Or IsNull(rs("Stilling")) Then
> Response.Write("-------")
> Else
> strNavn = rs("Stilling")
> strLink = "<a href=""stilling.asp?stilling=" & _
> rs("Stilling") & """>" & strNavn & "</a>"
> Response.Write "<td class=""td"">" & strLink & "</td>" & vbcrlf
> End If
> Response.Write "</td>" & vbcrlf
>
Det var det jeg mente, måtte dog lige rode lidt med den:

Response.Write "<td class=""td"">"
If rs("Stilling") = "" Or IsNull(rs("Stilling")) Then
Response.Write("-------")
Else
strNavn = rs("Stilling")
strLink = "<a href=""stilling.asp?stilling=" & _
rs("Stilling") & """>" & strNavn & "</a>"
Response.Write "" & strLink & "" & vbcrlf
End If
Response.Write "</td>" & vbcrlf

Mvh.
Henrik

---

On Wed, 10 Dec 2008 12:15:29 +0100, "Henrik Nielsen" <mahlhn@ft.dk>
wrote:

>
>Response.Write "<td class=""td"">"
>If rs("Stilling") = "" Or IsNull(rs("Stilling")) Then
>Response.Write("-------")
>Else
>strNavn = rs("Stilling")
>strLink = "<a href=""stilling.asp?stilling=" & _
>rs("Stilling") & """>" & strNavn & "</a>"
>Response.Write "" & strLink & "" & vbcrlf
>End If
>Response.Write "</td>" & vbcrlf

Du vil gøre din kode lidt mere gennemskuelig, hvis du skiller
databehandling og udskrift mere ad.
Desuden henter du i ovenstående rs("Stilling") 3 gange - det er ikke
særligt performance-venligt.


strNavn = Trim("" & rs("Stilling")) ' [1]
If strNavn = "" Then
strLink = "-------"
Else
strLink = "<a href=""stilling.asp?stilling=" & _
strNavn & """>" & strNavn & "</a>"
End If

Response.Write "<td class=""td"">" & strLink & "</td>" & vbcrlf


[1]: På den måde behøver du ikke både checke for Null og en tom streng.
(Null "forsvinder" når den lægges sammen med en streng).
Og du får fjernet evt. mellemrum før og efter - det sidste er måske ikke
så sandsynligt i databaser, men kan være det fra formularer etc.

Good luck!

--
Jørn Andersen,
Brønshøj

---

>>Response.Write "<td class=""td"">"
>>If rs("Stilling") = "" Or IsNull(rs("Stilling")) Then
>>Response.Write("-------")
>>Else
>>strNavn = rs("Stilling")
>>strLink = "<a href=""stilling.asp?stilling=" & _
>>rs("Stilling") & """>" & strNavn & "</a>"
>>Response.Write "" & strLink & "" & vbcrlf
>>End If
>>Response.Write "</td>" & vbcrlf
>
> Du vil gøre din kode lidt mere gennemskuelig, hvis du skiller
> databehandling og udskrift mere ad.
> Desuden henter du i ovenstående rs("Stilling") 3 gange - det er ikke
> særligt performance-venligt.
>
>
> strNavn = Trim("" & rs("Stilling")) ' [1]
> If strNavn = "" Then
> strLink = "-------"
> Else
> strLink = "<a href=""stilling.asp?stilling=" & _
> strNavn & """>" & strNavn & "</a>"
> End If
>
> Response.Write "<td class=""td"">" & strLink & "</td>" & vbcrlf
>
>
> [1]: På den måde behøver du ikke både checke for Null og en tom streng.
> (Null "forsvinder" når den lægges sammen med en streng).
> Og du får fjernet evt. mellemrum før og efter - det sidste er måske ikke
> så sandsynligt i databaser, men kan være det fra formularer etc.
>
OK, tak