Sto creando una galleria immagini, le estraggo dalla tabella e vorrei dare la possibilità all' utente di inserire una didascalia attraverso un campo text associato ad ogni immagine.
Per far ciò sto riscrivendo questo script (QUI ) in questo modo...

estraggo i dati...
codice:
Dim estrazioneCICLOIMMAGINE
Set estrazioneCICLOIMMAGINE = Server.CreateObject("ADODB.Recordset")
Dim SQLestrazioneCICLOIMMAGINE
SQLestrazioneCICLOIMMAGINE = "SELECT * FROM immagini WHERE codiceimmobile = '"&estrazioneDATIIMMOBILE("codiceimmobile")&"' ORDER By idimmagine"
conn.Execute(SQLestrazioneCICLOIMMAGINE)
estrazioneCICLOIMMAGINE.Open SQLestrazioneCICLOIMMAGINE, conn
ed eseguo il ciclo...
codice:
If estrazioneCICLOIMMAGINE.EOF then...
else
v = 0 ' contatore campi
ReDim datoOutput((estrazioneCICLOIMMAGINE.recordCount-1),3)

While Not estrazioneCICLOIMMAGINE.EOF
datoOutput(v,0) = estrazioneCICLOIMMAGINE("idimmagine")
datoOutput(v,1) = estrazioneCICLOIMMAGINE("didascalia")
datoOutput(v,2) = estrazioneCICLOIMMAGINE("preferita")
v = v + 1
With Response
ho poi un campo hidden per l' associazione dei dati ai rispettivi campi...
codice:
<input name="<%=estrazioneCICLOIMMAGINE("idimmagine")%><%=CStr(vx)%>" type="hidden" value="<%=datoOutput1(vx,0)%>">
chiudo il ciclo...
codice:
End With
estrazioneCICLOIMMAGINE.MoveNext
Wend
end if

ma tutto cio non funziona

chi mi può aiutare??
Grazie