Sintassi per Update di record esistente

[ubbicom]

Ciao e scusate la banale domanda... con la sintassi:

rs.AddNew

si aggiunge un record ad un dbase; se invece l'operazione deve essere solo di update, quindi solo modifica di un record esistente, quale è la sintassi corrispondente?
o devo usare una query di update? :master:

[99eros9]

puoi usare un query di update(consigliata).. o ometti la dicitura rs.AddNew... fermo restando che alla fine dovrai inserire rs.Update...

[ubbicom]

Originariamente inviato da 99eros9
puoi usare un query di update(consigliata).. o ometti la dicitura rs.AddNew... fermo restando che alla fine dovrai inserire rs.Update...

Grazie per la risposta; in effetti ho già utilizzato:

rs.AddNew
rs("File Name") = fileName
rs("File Size") = fileSize
rs("File Data").AppendChunk fileData
rs("Content Type") = contentType
rs("First Name") = fnameInput
rs("Last Name") = lnameInput
rs("Profession") = profession
rs.Update
				
rs.Close
Set rs = Nothing

è stato sufficiente eliminare rs.AddNew ed ho ottenuto quello che vorrei; nel senso che ho provato ad inviare ad un record esistente un file in upload, ed il record s'è aggiornato !!!! evviva !!!
Grazie mille

[ubbicom]

Originariamente inviato da ubbicom
Grazie per la risposta; in effetti ho già utilizzato:

rs.AddNew
rs("File Name") = fileName
rs("File Size") = fileSize
rs("File Data").AppendChunk fileData
rs("Content Type") = contentType
rs("First Name") = fnameInput
rs("Last Name") = lnameInput
rs("Profession") = profession
rs.Update
				
rs.Close
Set rs = Nothing

è stato sufficiente eliminare rs.AddNew ed ho ottenuto quello che volevo; nel senso che ho provato ad inviare ad un record esistente un file in upload, ed il record s'è aggiornato !!!! evviva !!!
Grazie mille

[ubbicom]

Mi sono rallegrato troppo presto... infatti il file inviato in upload non viene abbinato al record che desidero modificare, ma viene sempre caricato sul primo record della tbl del dbase... che ho combinato?

[ubbicom]

ho provato ad inserire questa query, ma non funziona, dove sbaglio?

<%
		
If fileSize > 0 Then
Dim connStr
connStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("up.mdb")
		
Dim rs
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "ListFiles", connStr, 2, 2
				
strSQL = "UPDATE ListFiles SET File Name = '"&File Name&"' WHERE UploadID ="&UploadID 
ConnStr.Execute(strSQL)

rs("File Name") = fileName
rs("File Size") = fileSize
rs("File Data").AppendChunk fileData
rs("Content Type") = contentType
					
rs.Update
				
rs.Close
Set rs = Nothing
				
End If
			
			
If Err.number <> 0 Then
Response.Write "
<font color=""red"">riprovare</font>"
End If
%>

l'errore è Expected end of statement
Grazie

[ubbicom]

Ci vado al manicomio... allora il form dell'upload:

<form method="POST" enctype="multipart/form-data" action="insert.asp?IDCD=<%=IDCD%>">

modifico il record:

<%
If fileSize > 0 Then
		
IDCD = Request.queryString("IDCD") 
Dim connStr
connStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("up.mdb")
		
Dim rs
Set rs = Server.CreateObject("ADODB.Recordset")
strSQL = "UPDATE ListFiles SET File Name = '"&File Name&"' WHERE UploadID ="&IDCD 
rs.Open strSQL, connStr, 2, 2
rs("File Name") = fileName
rs("File Size") = fileSize
rs("File Data").AppendChunk fileData
rs("Content Type") = contentType
rs.Update
rs.Close
Set rs = Nothing
connStr.Close 
set connStr = Nothing
End If
If Err.number <> 0 Then
Response.Write "NO"
End If
%>

ma restituisce:

Microsoft VBScript compilation error '800a0401'
Expected end of statement
/insert.asp, line 108
strSQL = "UPDATE ListFiles SET File Name = '"&File Name&"' WHERE UploadID ="&IDCD

dove sbaglio?

[ubbicom]

proprio non capisco...
mi viene passato regolarmente il numero del record e poi va in errore la query...
perchè?

strSQL = "UPDATE ListFiles SET File Name = '"&File Name&"' WHERE UploadID ="&IDCD

Microsoft VBScript compilation error '800a0401'
Expected end of statement

[99eros9]

prova a scrivere questo
strSQL = "UPDATE ListFiles SET File Name = '"&File Name&"' WHERE UploadID ="&IDCD

response.write(strSQL) : response.end

posta il risultato... credo che IDCD non sia valorizzata

[ubbicom]

Originariamente inviato da 99eros9
prova a scrivere questo
strSQL = "UPDATE ListFiles SET File Name = '"&File Name&"' WHERE UploadID ="&IDCD

response.write(strSQL) : response.end

posta il risultato... credo che IDCD non sia valorizzata

sulla barra degli indirizzi:
http://miosito.com/insert.asp?IDCD=619

la modifica:

strSQL = "UPDATE ListFiles SET File Name = '"&File Name&"' WHERE UploadID ="&IDCD 
response.write(strSQL)
response.end

non dà risulati diversi rispetto all'errore di prima... :master: