update base de données

Question

Impossible de faire fonctionner ceci!!!!
C'est le  where qui ne passe pas.

  <% RefLot=Request.Querystring("reference")
RefLot=CINT(RefLot)

dim objConnect
dim objRecordset

set objConnect = Server.CreateObject("ADODB.Connection")
objConnect.Open "Mabase"

set objRecordset = Server.CreateObject("ADODB.Recordset")
 
strSQL = "Select * from flash where ID= '" & RefLot & "' "

objRecordset.Open strSQL , objConnect,3,3 %>

cs_Benz · Answer

Salut,

Tu as peut être un problème de format de donnée. Je ne sais pas si ca marche, mais tu peux tester ton code en modifiant cette ligne :
__________________________________________
strSQL = "Select * from flash where ID= '" & RefLot & "' "
__________________________________________

En supprimant les simples quote comme ceci :
__________________________________________
strSQL = "Select * from flash where ID= " & RefLot & " "
__________________________________________

Chez moi, la requete suivante fonctionne très bien, sans les simples quotes :
__________________________________________
REQUETE="DELETE * FROM table WHERE ID_toto="&intIDToto&""
__________________________________________

Benz

Update base de données

1 réponse

Votre réponse

Discussions similaires