19. november 2000 - 17:02
Der er
8 kommentarer og 1 løsning
hvad er der galt???
Hvad er der galt med dette??? <% strDir = Request(\"Dir\") strUrl = Request(\"Hjemmeside\") strNavn = Request(\"navn\") strEmail = Request(\"email\") Set Conn = Server.CreateObject(\"ADODB.Connection\") Set Rs = Server.CreateObject(\"ADODB.RecordSet\") strConn = \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"& Server.MapPath(\"hej.mdb\") Conn.Open strConn strSQL = \"SELECT * FROM hej WHERE hej-d=\'\" & strDir & \"\';\" Set Rs = Conn.Execute(strSQL) If Rs.BOF Then \' Sub eksistere ikke strSQL = \"INSERT INTO hej (hej-d, E-mail, Url, Navn) VALUES(\'\" & strDir & \"\',\'\" & strEmali & \"\',\'\" & strUrl & \"\',\'\" & strNavn & \"\');\" Conn.Execute strSQL strRedir = \"er oprettet...\" Else strRedir = \"er optaget...Prøv et andet.\" End If Set Rs = Nothing Conn.Close: Set Conn = Nothing response.write strRedir %> Jeg får fejlen Microsoft OLE DB Provider for ODBC Drivers fejl \'80040e10\' [Microsoft][ODBC Microsoft Access-driver] Der er for få parametre. Der var ventet 2. /test.asp, linje 70 ( ved Set Rs = Conn.Execute(strSQL) )
Annonceindlæg fra Hitachi
”Forskellighed gør os stærkere!”
Diversitet er ikke kun buzzwords og politisk korrekthed, men et spørgsmål om at alle føler sig godt tilpas og kan yde deres bedste.
31. januar 2025
19. november 2000 - 17:08
#1
- stavekontrollen er smuttet - du har skrevet \"strEmali\" i din kode...
19. november 2000 - 17:10
#2
>>Rex2 det var ikke det der var fejlen
19. november 2000 - 17:20
#3
Prøv lige : strSQL1=\"INSERT INTO hej (hej-d, E-mail, Url, Navn) VALUES(\" strSQL2=strDir & \", \" & strEmail & \", \" & strUrl & \", \" & strNavn & \");\" strSQL=strSQL1 & strSQL2 hvis det virker er det det sædvanelige problem med \' og \" ddn
19. november 2000 - 17:27
#4
får stadig fejlen!!!
19. november 2000 - 17:32
#5
hmm. hvad med at bruge addnew ?
19. november 2000 - 17:33
#6
Dette er taget fra min egen side og det virker : <% \'Tilføj den nye bruger i databasen strConn = \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"adgangskontrol.mdb\") Set RS = Server.CreateObject(\"ADODB.RecordSet\") strQ = \"SELECT * FROM adgangskoder\" RS.Open strQ, strConn, 1, 2 RS.AddNew RS(\"BrugerID\")=session(\"BID\") RS(\"RealName\")=session(\"Navn\") RS(\"Username\")=session(\"Brugernavn\") RS(\"Password\")=session(\"Adgangskode\") RS(\"Email\")=session(\"Email\") RS.Update RS.Close Set RS = Nothing %>
19. november 2000 - 17:36
#7
I dit tilfælde er det : <% \'Tilføj den nye bruger i databasen strConn = \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"hej.mdb\") Set RS = Server.CreateObject(\"ADODB.RecordSet\") strQ = \"SELECT * FROM hej\" RS.Open strQ, strConn, 1, 2 RS.AddNew RS(\"hej-d\")=strDir RS(\"E-mail\")=strEmail RS(\"Url\")=strUrl RS(\"Navn\")=strNavn RS.Update RS.Close Set RS = Nothing %>
19. november 2000 - 20:41
#8
Tak for hjælpen ddn. Nu virker det!
19. november 2000 - 23:25
#9
Anytime !
Kurser inden for grundlæggende programmering