ciao a tutti ragà il mio problema è inserire il testo nel data base e il percorso virtuale da una classe di upload.
questo è il codice della pagina upload(ho tolto tutto il codice html per renderlo più visualizzabile)
<form method="POST" enctype="multipart/form-data" action="do_upload.asp">
<%
set custRs = Server.CreateObject("ADODB.Recordset")
custRs.Fields.Append "nome", 200, 300 ' adVarChar
custRs.Fields.Append "dimensione", 2, 4 ' smallint
custRs.Fields.Append "data", 7 ' Date
custRs.Open

' popolamento
Set FileObject = Server.CreateObject("Scripting.FileSystemObject")

Set f = FileObject.GetFolder(strPath)

For Each f1 in f.Files
custRs.AddNew
custRs("nome") = f1.name
custRs("data") = f1.DateCreated

Next

Set f = Nothing
Set FileObject = Nothing

custRs.Sort = "data DESC"

If Not custRS.EOF AND Not custRS.BOF Then
nomefile = custRs("nome")

Set FileObject = Server.CreateObject("Scripting.FileSystemObject")
Set f = FileObject.getfile(StrPath&"\"&nomefile)
he = ImageHeight(StrPathShort & nomefile)
wi = ImageWidth(StrPathShort & nomefile)
resized = ImageResize(StrPathShort & nomefile, 80, 80, "center")
Response.Write "<tr><td align=""center"">Ultima immagine inserita: " & f.DateCreated & "</td></tr>"
Response.Write "<tr><td align=""center"">" & vbcrlf & "<table width=""100%""><tr><td align=""center""><table cellspacing=""0"" cellpadding=""0"" style=""border: 1 solid #6699CC""><tr><td><a href=""javascriptoPopUp('zoom.asp?image=" & nomefile & "','','" & wi & "','" & he & "','yes','no','no')"" title=""Zoom"">" & resized & "</a></td></tr></table></td></tr><tr><td align=""center"">" & nomefile & "<br>" & wi & "x" & he & " - " & f.size & " byte</td></tr></table></td></tr>" & vbcrlf
Set f = Nothing
Set FileObject = Nothing
Else
%>
<%
End If
%>

<input type="text" name="nome" size="20" maxlength="20">
<input type="file" name="blob1" size="40">
<input type="submit" name="enter" value=" Invio ">
</form>
<%
Dim objFSO, objFolder, objFile, objText

Set objFSO = server.createobject("scripting.filesystemobject")
Set objFolder = objFSO.getfolder(strpath)

fileMAX = 8
intTotalFiles = objFolder.Files.Count
If objFolder.Files.Count MOD fileMAX = 0 Then
intTotalPages = Int(objFolder.Files.Count/fileMAX)
Else
intTotalPages = Int(objFolder.Files.Count/fileMAX)+1
End If
%>

questo invece è il codice della pagina send,asp che con cui "dovrei" inserire tutto nel DB. come devo compilarlo?

<%
'crea oggetto connessione
set loginDB = Server.CreateObject("ADODB.Connection")
loginDB.ConnectionString="DRIVER={Microsoft Access Driver (*.mdb)};" & "DBQ=" & Server.MapPath("mdb-database/login.mdb")

'apri la connessine
loginDB.OPEN
'creo l'oggetto recordset
set RS = Server.CreateObject("ADODB.Recordset")

'dichiaro la stringa sql
sql = "select * from image"
rs.open sql,loginDB,3,3

RS.Addnew
rs("nome") = Request.form("nome")
rs("strpath") = Request.form("strpath")


RS.Update
'chiudo l'oggetto recordset
RS.close

'chiudo la connessione
loginDB.close
set loginDB = Nothing

%>

grazie per l'aiuto

aiutooooooo

Cioè qual è il problema?? Non ti scrive nel database? Forse perché hai dimenticato il custRs.Update dopo l'Addnew e la specifica dei dati?

Ti ho detto che ti manca l'update del record, altrimenti non ti viene scritto nulla sul database:

o, più semplicemente esegui la query

No, mica mi sono arrabbiato
Allora, prova ad eseguire l'inserimento in altro modo, cioè senza aprire un recordset (inutile) ma eseguendo semplicemente una query di inserimento come quella che ti ho proposto nel messaggio precedente.