Statut : Non résoluASP: Insertion d'enregistrement
Posté par
Aki, le jeudi 6 juin 2002 à 12:32:59 ¨Peut-on utiliser la méthode ADDNEW de recordset en ASP.
(J'utilise SQL Server).
Chaque fois que je veux faire un nouvel enregistrement, je recois le message suivant:
------------------------------
Erreur de compilation Microsoft VBScript error '800a0401'
Fin d'instruction attendue
/iisHelp/common/500-100.asp, line 11
Dim objASPError, blnErrorWritten, strServername, strServerIP, strRemoteIP Dim strMethod, lngPos, datNow, strQueryString, strURL
--------------------------------------------------------------------------^
Microsoft OLE DB Provider for ODBC Drivers error '80040e21'
Une opération OLE-DB en plusieurs étapes a généré des erreurs. Vérifiez chaque valeur d'état OLE-DB disponible. Aucun travail n'a été effectué.
-------------------------------------------
Le code utilisé est le suivant:
-------------------------------------------------------------------
dim objConn, objRst
' création et ouverture des objets
Set objConn = Server.CreateObject("ADODB.Connection")
set objRST = server.CreateObject("adodb.recordset")
objconn.Open "LienODBC", "USER" , "PASSWORD"
objrst.Open "tblUser", objConn, 2, 2
' Ajout d'enregistrement
objRst.AddNew
objRst.Fields("txtUserEmail")=strNewEmail ' Erreur a cette ligne ci, juste après le addnew
objRst.Fields("txtUserPassword")= strNewPassword
objRst.Fields("dteUserCreated") = date()
objRst.Fields("timUserCreated") = time()
objRst.Fields("intAccountNumber") = intAccountNumber
objRst.Update
'Fermeture et libération des objets
objRst.Close
set objRst = nothing
objConn.Close
set objConn = nothing
----------------------------------------------------------------------------------
Aki