salve a tutti!

ieri ho provato vari comandi su come creare una gallery senza usare database.....

quindi ho creato uno script (anche grazie all'aiuto dei frequentatori di questo forum) che:

1) legge quanti file ci sono in una directory
2) prende il nome di ognuno e crea un link per ognuno di essi

il codice:

codice:
Set fso = CreateObject("Scripting.FileSystemObject")
Set folderObject = fso.GetFolder(Server.MapPath("dataimages"))
Set filesObject = folderObject.Files
i=0 
For Each file In filesObject
i=i+1 

response.write("<table cellpadding='4' border='0'><td>[b]File n." &i& "</td><tr><td>")
response.write(objRs("descrizione") & objRs("id"))
response.write("</td><tr><td>  Nome = " &file.name& "</td></table>")

Next

Set fileObject = Nothing
Set folderObject = Nothing
Set fso = Nothing 
%>
ora avevo pensato.....ma una piccola descrizione della foto?
potrei dirgli che per ogni file nella directory deve creare un record set, (stavolta per forza con un database), ma ci sto provando in tutti i modi, niente!!!!

ho provato cosi!
codice:
<%
Set fso = CreateObject("Scripting.FileSystemObject")
Set folderObject = fso.GetFolder(Server.MapPath("dataimages"))
Set filesObject = folderObject.Files
i=0 
For Each file In filesObject
i=i+1 

strSQL="SELECT * from tabella "
Set objconn = Server.CreateObject ("ADODB.Connection")
objconn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("dbimages.mdb") 
Set objRS = Server.CreateObject ("ADODB.Recordset")
ObjRS.Open strSQL,objconn, 3, 3

ObjRs.addnew
ObjRs(1) = filesObject
ObjRs.update

Next


%>
sapete dirmi perche non funziona?

ecco l'errore:

Microsoft VBScript runtime error '800a01c2'

Wrong number of arguments or invalid property assignment: 'objRS'

/magia.asp, line 26