Toon posts:

[ASP] - ACCES RecordSet updaten

Pagina: 1
Acties:

Verwijderd

Topicstarter
Morguh! :)

Ik snap er de ballen van!
Ik doe toch echt, wat er in mijn mooie 500 pagina dikke ASP boek staat, en krijg TOCH nog een error.
Ik wou graag een recordset UPDATEN, dus niet toevoegen, of verwijderen, of wat dan ook, maar de bestaande recordset updaten.

Ik gebruik deze code:
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
<%
Dim cnDB
Dim rsQuery

Set cnDB = Server.CreateObject("ADODB.Connection")
cnDB.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data source= D:\Accounts\DSAccounts\creepsworld\creepsworld.com\db\database.mdb"
cnDB.Open

Set rsQuery = Server.CreateObject("ADODB.Recordset")
rsQuery.Open "SELECT * FROM login WHERE UserID = '" & Request.Form("UserID") & "'", cnDB, 2, 2

rsQuery("Password") = Request.Form("Password")
rsQuery("Email") = Request.Form("Email")
rsQuery.Update
rsQuery.Close
cnDB.Close
%>

En krijg deze error:
code:
1
2
3
4
5
Microsoft JET Database Engine error '80040e07' 

Data type mismatch in criteria expression. 

/svencoop/temp/main_edit.asp, line 11

Ik snap 't niet, ik doe toch echt wat er in dat boek staat...en als ik iets wil toevoegen, dan lukt het wel.
Btw: Line 11 is de SQL query.

Alvast bedankt!

  • BlackBurn
  • Registratie: Juni 2001
  • Laatst online: 14:36

BlackBurn

One Ring To Rule Them All

Ik neem aan dat UserID een Numeriek veld is, misschien blijft hij daar opsteken, je zou dit kunnen proberen.
code:
1
rsQuery.Open "SELECT * FROM login WHERE UserID = " & CInt(Request.Form("UserID")), cnDB, 2, 2

Succes

If it is broken, fix it. If it ain't broken, make it better!


Verwijderd

Topicstarter
YES!
Hij werkt!!
Hartstikke bedankt!!!