betingelse kan ikke blive opfyldt

hov...

Den sidste ElseIf skulle hedde  rs("img") <> "" Then

Ok, jeg fik lavet en del fejl  der :DD

Sådan her: :)


If rs("imglink") = "" And rs("imglink") = "" Then
Response.Write "noget"

ElseIf rs("img") <> "" Then
Response.Write "noget andet"

ElseIf rs("imglink") <> "" Then
Response.Write "Noget tredje"

End If

skal den øverste ikke være med både img og imglink og ikke imglink 2 gange,...

og hvad er det helt præcist du siger ikke virker ?

Jo, det har du ret i... Det står også rigtigt i min kode, men jeg lavede en masse fejl da jeg skrev det herinde :)

sorry :/

Problemet er, at hvis de 2 felter er tomme(img og imglink), sker der intet..

de andre 2 betingelser (elseif'erne) fungerer som de skal

Asp er ikke lige mig..

Men hvis :

<%

Dim imglink, img

img = ""
imglink = ""

If img = "" And imglink = "" Then
Response.Write "noget"

ElseIf imglink <> "" Then
Response.Write "noget andet"

ElseIf img <> "" Then
Response.Write "Noget tredje"

End If
%>

Virker...

Så må :

<%

Dim imglink, img

img = rs("img")
imglink = rs("imglink")

If img = "" And imglink = "" Then
Response.Write "noget"

ElseIf imglink <> "" Then
Response.Write "noget andet"

ElseIf img <> "" Then
Response.Write "Noget tredje"

End If
%>

også virke...

Ellers er det noget med dit recordset... jeg kender ikke til vb så godt, men hvis rs("img") ikke indeholder noget... er den så null ?

Det fungerede ikke...

Men jeg aner ikke hvornår et felt er null - er det bare når feltet er tomt eller..?


Skriver lige koden igen, så der ingen fejl er...


If rs("img") = "" And rs("imglink") = "" Then
Response.Write "noget"

ElseIf rs("img") <> "" Then
Response.Write "<img src=" & rs("img") & ">"
Response.Write "noget"

ElseIf rs("imglink") <> "" Then
Response.Write "<img src=" & rs("imglink") & ">
Response.Write "noget"

End If

og mit recordset skulle være i orden. Det virker jo med ElseIf'erne :)

nedenstående er jo akkurat det samme.. og den udskriver "noget" og der er img og imglink tomme..

jeg har ikke dit RS tilgængelig.. derfor bør det jo være ligegyldigt om strengen kommer fra rs eller er "hardcoded".. prøv at give img og imglink forskellige værdier i nedenstående.

<%

Dim imglink, img

img = ""
imglink = ""

If img = "" And imglink = "" Then
Response.Write "noget"

ElseIf imglink <> "" Then
Response.Write "noget andet"

ElseIf img <> "" Then
Response.Write "Noget tredje"

End If
%>

prøv ex før det hele at udskrive dem fra rs

Response.Write("imglink:|" & rs("imglink") & "|")
Response.Write("img:|" & rs("img") & "|")

så kan du lettere se om det er hvad du forventer.

Hvis jeg "hardcoder" dem, virker det fint...

Prøver lige det andet

Der udskriver den intet, som forventet...

hmmm det er sku underligt :)

Prøv :

<%

Dim imglink, img
img = ""
imglink = img
img = rs("img")
imglink = rs("imglink")

If img = "" And imglink = "" Then
Response.Write "noget"

ElseIf imglink <> "" Then
Response.Write "noget andet"

ElseIf img <> "" Then
Response.Write "Noget tredje"

End If
%>

Vi er ude i det helt store debugging :D

Prøver lige :)

Det giver samme resultat..
Den udskriver ikke "noget"

Jeg kigger det lige efter i sømmene... Det er jo dybt underligt

Det er godt nok den helt store gætteleg..

Men læste man kunne :

<%

Dim imglink, img
img = rs("img") & ""
imglink = rs("imglink") & ""

If img = "" And imglink = "" Then
Response.Write "noget"

ElseIf imglink <> "" Then
Response.Write "noget andet"

ElseIf img <> "" Then
Response.Write "Noget tredje"

End If
%>

Det skulle parse eventuelle null værdier fra RS til tomme strenge

Ehh.. jow det virker sgu!

Har du en forklaring for jeg er sgu ok forvirret - Jeg havde checket databasen 700 gange for at se om felterne virkelig var tomme...
Hvordan dælen kan de så være at det virker når man tilføjer "INGENTING" efter udtrækket...!? :)

Burde det så ikke have virket hvis jeg skrev
If rs("img") = null And rs("imglink") = null Then


?

jo ..

som sagt kan jeg ikke så godt huske den smule vb jeg kunne engang..

Hvis der ikke står noget i databasen bliver rs("etellerandet") == null

Men hvis der står en tom streng i databasen, måtte man forvente den blev ""

Det jeg så gør er at sige

img = null + ""; som giver ""

skulle rs("img") være ex billede.jpg bliver det

img = billede.jpg + "" som giver "billede.jpg"

Metoden skulle altså være bulletproof... men lad gerne spørgsmålet stå åbent, det kan være asp har en endnu bedre mulighed for at tjekke dette

jeg har tyvstjålet denne funktion fra et site

Den skulle teste om en streng er tom..

Så bliver det noget ala :
(men ser ikke hvorfor den anden ikke kan gå :) )


<%
Function IsBlank(ByRef TempVar)

    'by default, assume it's not blank
    IsBlank = False

    'now check by variable type
    Select Case VarType(TempVar)
   
        'Empty & Null
        Case 0, 1
            IsBlank = True
       
        'String
        Case 8
            If Len(TempVar) = 0 Then
                IsBlank = True
            End If
           
        'Object
        Case 9
            tmpType = TypeName(TempVar)
            If (tmpType = "Nothing") Or (tmpType = "Empty") Then
                IsBlank = True
            End If
       
        'Array
        Case 8192, 8204, 8209
            'does it have at least one element?
            If UBound(TempVar) = -1 Then
                IsBlank = True
            End If
    End Select
End Function


Dim imglink, img
img = rs("img")
imglink = rs("imglink")

If isBlank(img) And isBlank(imglink) Then
Response.Write "noget"

ElseIf imglink <> "" Then
Response.Write "noget andet"

ElseIf img <> "" Then
Response.Write "Noget tredje"

End If
%>

ok, takker for ekstra info...

Undrer mig over at If rs("img") = null ikke virkede. :?

Det virker jo nu, men min nysgerrighed kan ikke lade det ligge, så...
I mine tidligere projekter, har jeg altid brugt "", og det har altid virket. Databasen har jeg bygget op på samme måde som altid før... Hvordan kan det så være, at et felt pludselig er blevet Null? Hvad kan jeg have gjort anderledes denne gang? hmmm.. Har du et bud?

Det er en access database, og jeg har som sagt opbygget den som jeg altid har gjort før...

ggid jeg selv havde kompetancen til at lave den slags Functions :D heh

du skal tage at skifte til asp.net...

Det bruger jeg, og er 1000 gange lettere for os "amatører" ... du skal dog lige have sat dig nogenlunde ind i object orienteret programmering, noget jeg selv døjer med, men har lært en bitte smule..

Nu går det 1000 gange hurtigere at lave ordentlig kode...

ex i asp.net er det bare !String.IsNullOrEmpty() så tester den selv, og med VS/V webdeveloper, er der intellicense, så man skal ikke slå op konstant hvis det er noget man er i tvivl om, den foreslår selv sådanne.

Super, takker... Jeg skal også snart have undervisning i .NET - Bliver fedest :)

Hvis du nu sikrede dig at de tomme felter ikke er NULL, men indeholder en tom streng, "", så ville du ikke have problemet. Sæt default værdien i felterne til "", og forbyd NULL.

Man kan ikke sige Noget = NULL, for NULL er ikke lig noget som helst, brug Noget IS NULL i stedet