webForumDet fria alternativet

Ingen info

ASPur ASP

6 svar · 236 visningar · startad av Maggan74

Maggan74Medlem sedan okt. 200355 inlägg
#1

Hej och hallå,
En liten undran. Jag har en länk och när man klickar på länken så ska man se information som har blivit inlagt i en tabell. Men om tabellen är tom så vill jag få fram meddelandet att det inte finns någon information. Känns som ett väldigt simpelt fel men jag har provat med hur mycket som helst men får det inte att fungera.
Har den här koden:

Set RS = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM tblBudget" 
RS.Open SQL, Conn, adOpenStatic, adLockOptimistic

If (RS("Budget" = "")) Then
Response.Write("Inga mål har blivit inlagda")
Response.Write("<a href=""admin.asp"">Tillbaka</a>")
Else

Hittad = False
Do while Not(RS.EOF OR Hittad)
If(strComp(RS("SiteID"),SiteID,vbTextCompare)=0) Then
Hittad = True
Else
RS.MoveNext
End if
Loop

End if

Har även provat med:

If((Request.Form("Budget") = "")OR_
 (Request.Form("Goal") = "")_
 OR(Request.Form("StartDate") = "")OR_
 (Request.Form("SlutDate") = "")_
 OR(Request.Form("SiteID") = ""))Then
osv...

Och:

If((RS("Budget") = "")OR_
 (RS("Goal") = "") _
OR(RS("StartDate") = "")_OR 
(RS("SlutDate") = "") _
OR(RS("SiteID") = ""))Then
osv...

Hjälp. Pls. :l

@ndersMedlem sedan juni 200032 969 inlägg
#2
If RS.EOF then
     ' Recordsetet är tomt
Else
     ' Gör allt du vill
End if

Mvh

LarsGMedlem sedan dec. 200012 464 inlägg
#3

Flyttas från SQL

Maggan74Medlem sedan okt. 200355 inlägg
#4

Och då får jag felet:
"Antingen är BOF eller EOF satt till True, eller så har aktuell post raderats. Den begärda åtgärden kräver en aktuell post."
Det går trögt med tankeverksamheten idag... ;)

@ndersMedlem sedan juni 200032 969 inlägg
#5

Du ska endast använda värden från ditt recordset inne i ELSE-delen i if-satsen i mitt exempel.

Mvh

Maggan74Medlem sedan okt. 200355 inlägg
#6

Det gör jag fast jag använder två if-satser... Så här:

If RS.EOF then
    Response.Write("Inga mål har blivit inlagda")
	Response.Write("<a href=""admin.asp"">Tillbaka</a>")
Else
Hittad = False
Do while Not(RS.EOF OR Hittad)
If(strComp(RS("SiteID"),SiteID,vbTextCompare)=0) Then
Hittad = True
Else
RS.MoveNext
End if
Loop
End if
Maggan74Medlem sedan okt. 200355 inlägg
#7

Eller nej vänta... Det ser ut som jag fixade till det. La till koden på fel ställe.... :r

Tack för hjälpen.

133 ms totalt · 3 externa anrop · v20260731065814-full.29ac60f6
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
129 ms — hämta tråd, inlägg och bilagor (db)