kolla om startnr finns

ASP

4 svar · 186 visningar · startad av icaaq

Medlem sedan okt. 20005 273 inlägg
Trådstart#1
If Request.Form > "" Then
	Call CollectData
	If ValidateForms = 1 Then
		VarError = "Du har inte fyllt i alla obligatoriska fält"
		Call Form
	Else								
		Set Objconn = Server.CreateObject("ADODB.Connection") 
			Objconn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Inetpub\wwwroot\data\XXX.mdb"
			Objconn.open
		[b]strSQL0 ="SELECT F_STARTNR FROM T_TEAM WHERE F_STARTNR = "&intStartnr&""
		Response.Write strSQL0
		set ObjRS0 = ObjConn.execute(strSQL0)
			If ObjRS0.EOF Then
				VarError = "Startnummret finns redan testa ett annat"
				Call Form[/b]
			Else
				strSQL ="INSERT INTO T_TEAM(F_STARTNR, F_SKEPPARE, F_TEAM, F_ADRESS, F_BATLANGD, F_POSTNR, F_TELEBAT, F_TELE, F_VHF, F_MOBIL, F_MEDLEMMAR1, F_MEDLEMMAR2, F_MEDLEMMAR3)"&_
					"VALUES("&intStartnr&", '"&strSkeppare&"', '"&strTeam&"', '"&strAdress&"', '"&strBatLangd&"', '"&strPostnr&"', '"&strTeleBat&"', '"&strTele&"', '"&strVHF&"', '"&strMobil&"', '"&strMedlemmar1&"', '"&strMedlemmar2&"', '"&strMedlemmar3&"')"
				ObjConn.Execute(strSQL)
				strSQL2 ="INSERT INTO T_FISKAR(F_STARTNR)VALUES("&intStartnr&")"
				ObjConn.Execute(strSQL2)
				ObjConn.Close
				Set ObjConn = Nothing
				Response.Redirect "default.asp"
			End If
	End If
Else
Call Form
End If

Det är asso den fet markerade koden som inte funkar som jag vill, och det jag vill är att om startnummret finns ska den säga det men det gör den inte ....varför!!

Medlem sedan juni 20019 024 inlägg
#2

Kanske

If ObjRS0.EOF Or ObjRSO.BOF Then
Medlem sedan juni 20019 024 inlägg
#3

Nej, förresten, WHERE NOT ska det väl vara?

Medlem sedan dec. 200012 464 inlägg
#4
If [b]not[/b] ObjRS0.EOF Then
VarError = "Startnummret finns redan testa ett annat"
Call Form
Medlem sedan okt. 20005 273 inlägg
#5

LarsG du är en pärla !!!

253 ms totalt · 4 externa anrop · v20260731065814-full.d34c6d5a
120 ms — deklarationer (db)
0 ms — hämta statistik (cache)
129 ms — hämta tråd, inlägg och bilagor (db)
121 ms — ändringar (db)