Är uId fältet ett textfält ?
Om det är en räknare med Int
så får du skriva
Set RecSet = Connect.Execute("SELECT * FROM Users WHERE uID=" & strID & " ")
12 svar · 305 visningar · startad av Del Pero
Denna kod:
ElseIf strDo = "delete_member" Then
strID = Request.QueryString("ID")
'--------------------- öppnar databasen
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open db1
Set RecSet = Connect.Execute("SELECT * FROM Users WHERE uID='" & strID & "' ")
RecSet.Delete
RecSet.Update
RecSet.Close
Set RecSet = nothing
Connect.Close
Set Connect = nothing
Response.Redirect "admin.asp?action=delete_user"
Genererar detta fel:
Microsoft JET Database Engine (0x80040E07)
Typblandningsfel i villkorsuttryck.
/jk/jkadmin/action.asp, line 155
Line 155 är denna:
Set RecSet = Connect.Execute("SELECT * FROM Users WHERE uID='" & strID & "' ")
Vad är felet? :)
Är uId fältet ett textfält ?
Om det är en räknare med Int
så får du skriva
Set RecSet = Connect.Execute("SELECT * FROM Users WHERE uID=" & strID & " ")
Tackar!
Det är en räknare :)
Nu blev det ett annat fält istället...
ADODB.Recordset (0x800A0CB3)
Aktuellt Recordset kan inte uppdateras. Det kan bero på en begränsning av providern eller den valda låstypen.
/jk/jkadmin/action.asp, line 157
Line 157:
RecSet.Delete
typ:
Connect.Open db1, 3, 3
eller vad det nu ska vara för låstyp.
Tips, sök på "låstyp" eller den felkod du fick. => 0x800A0CB3
Woho :bire
Vi jobbar vidare ;)
Nu fick jag detta fel istället
Microsoft JET Database Engine (0x80040E4D)
Det går inte att starta programmet. Informationsfilen för arbetsgrupper saknas eller är exklusivt öppnad av någon annan användare.
/jk/jkadmin/action.asp, line 154
kanske ska jag lägga ner arbetet för ikväll? ;)
Håll databasen stängd när du jobbar online.
Konstigt, den är det :o
Nu hoppar jag i säng, se till att ha löst detta när jag vaknar imorrn bitti mina små kodslavar! :e
Byt koden i det första inlägget mot:
ElseIf strDo = "delete_member" Then
strID = Request.QueryString("ID")
'--------------------- öppnar databasen
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open db1
Connect.Execute "DELETE FROM Users WHERE uID=" & strID, , 128
Connect.Close
Set Connect = nothing
Response.Redirect "admin.asp?action=delete_user"
Mvh,
Jag tror jag älskar er!
Del Pero skrev:
Jag tror jag älskar er!
Jag älskar dig med, men jag tycker du ska lära dig söka istället. Denna fråga måste ha tio trådar nu.
10? Det finns nog många fler. ;)
Jag lyckades dock inte hitta någon. Av någon anledning får man inga träffar när man söker på vare sig "Typblandningsfel" eller "villkorsuttryck".
Märkligt.
casca skrev:
Del Pero skrev:
Jag tror jag älskar er!
Jag älskar dig med, men jag tycker du ska lära dig söka istället. Denna fråga måste ha tio trådar nu.
Det var ju det jag gjorde... prova att söka så får du se vad som händer.
ni som bidragit med hjälp i denna tråden: tack!
Relaterade trådar
http://www.webforum.nu/showthread.php?s=&threadid=13498&highlight=typbland*
http://www.webforum.nu/showthread.php?s=&threadid=11984&highlight=typbland*
http://www.webforum.nu/showthread.php?s=&threadid=10396&highlight=typbland*
http://www.webforum.nu/showthread.php?s=&threadid=7024&highlight=typbland*
http://www.webforum.nu/showthread.php?s=&threadid=5669&highlight=typbland*
N00bs. :f