3 messaggi dal 22 giugno 2001
Ciao,

vorrei fare l'upload di un file e la scrittura di due record in altrettante tabelle nel DB on line.
Ho due file. il primo con un form (campi di testo e campi di tipo checkbox per selezionare n scelte), il secondo che riceve i valori del form ed esegue lo script per l'upload e la scrittura del DB.
Uso l'oggetto ASPMARTUPLOAD.
Lo script inizialmente (della 2 pag)era il seguente:

<%

' Variables
' *********
Dim mySmartUpload
Dim intCount

' Object creation
' ***************
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")

' Upload
' ******
mySmartUpload.Upload

' Save the files with their original names in a virtual path of the web server
' ****************************************************************************
path=Server.mappath("\database")
intCount = mySmartUpload.Save(""&path&"")

' Display the number of files uploaded
' ************************************
Response.Write(intCount & " file(s) caricato.<br>")

' Select each file
' ****************
For each file In mySmartUpload.Files
Response.Write(file.FileName & " (" & file.Size & "bytes)<BR>")
Next

' FORM Collection
' ***************

marca=mySmartUpload.Form("marca")
modello=mySmartUpload.Form("mod")
descrizione=mySmartUpload.Form("descrizione")
colore=mySmartUpload.Form("colore")
prezzo=mySmartUpload.Form("prezzo")
anno=mySmartUpload.Form("anno")
nuovo_usato=mySmartUpload.Form("nuovo_usato")


For each file in mySmartUpload.Files
linkfile=File.FileName

Next

' Inserimento record
' ******************

path=Server.mappath("\database")
set Command1 = Server.CreateObject("ADODB.Command")
Command1.ActiveConnection = "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source="&path&"\datiauto.mdb"
Command1.CommandText = "INSERT INTO schede (marca, immagine, modello, txt, colore, anno, prezzo, nuovo_usato) VALUES ('"&marca&"','"&linkfile&"','"&modello&"','"&descrizione&"', '"&colore&"', '"&anno&"', "&prezzo&", '"&nuovo_usato&"')"
Command1.CommandType = 1
Command1.CommandTimeout = 0
Command1.Prepared = true
Command1.Execute()

%>

e fin qui' nessun problema.
Poi ho dovuto inserire nella 1 pag una serie di pulsanti checkbox:

<INPUT TYPE="checkbox" NAME="opt<%=(RS_optional.Fields.Item("ID").Value)%>" VALUE="<%=(RS_optional.Fields.Item("tipo").Value)%>">

dentro un repeat.
Come faccio adesso nella 2 pag a inserire i valori dei soli campi selezionati(con i Check) in variabili (che poi andro' a scrivere nel db)?
Ho provato ad inserire nella 2 pag il seguente codice:

optional1=mySmartUpload.Form("opt1")
optional2=mySmartUpload.Form("opt2")
...ecc
per tutti i checkbox;
ma funziona solo per i checkbox selezionati,
quando ne incontra uno non sel., viene visualizzato nel browser "imposs. visual. la pagina".






Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.