Upload Baol + Mysql

**Giro12** · 23-01-2010, 12:53

Salve a tutti è possibile utilizzare l'Upload di baol e mysql?

Sto utilizzando lo stesso script (funzionate ) che usavo per salvare il file su acces e l'upload dell'immagine nella cartella

Ho provato ad utilizzarlo con mysql e mi da alcuni problemi
ovvero

codice:

Microsoft VBScript runtime  error '800a01a8'

Object required: 'Files'

/public/upload.asp, line 365

Non effettua l'upload dell img e tantomeno salva il nome del file
Utilizzo questo script

codice:

	Dim oUpload
		Set oUpload = new cUpload
		oUpload.AutoRename = True
		oUpload.Overwrite = False
		oUpload.SetPath "admin" 'Impostazione del percorso
		oUpload.Load
'connessione my sql

DB_CONNECTIONSTRING = "driver={MySQL};server="&MySQLSVR&";port="&MySQLPRT&";"_
					& "uid="&MySQLUID&";pwd="&MySQLPWD&";database="&MySQLDB&";option="&MySQLOPT&""
		

livello= oUpload.Form("livello")
nome	= oUpload.Form("nome")
cognome	= oUpload.Form("cognome")
email	= oUpload.Form("email")	  
username	= oUpload.Form("username")
password	= oUpload.Form("password")
img= FileName_img

SQL = "INSERT INTO admin (livello,nome,cognome,email,username,password,img) VALUES ('"& livello &"','"& nome &"','"& cognome &"','"& email &"','"& username &"','"& password &"',,'"& img&"') "
Conn.execute (SQL)
		
		Set Conn=Nothing				
		Set oUpload = Nothing

		response.Redirect "add_admin.asp?txt=aggiunto+con+successo+!!!"

**cavicchiandrea** · 23-01-2010, 13:10

Sicuro, qui chiami la connessione al db DB_CONNECTIONSTRING ma l'inserimento lo fa cosi Conn.execute :master:

**Giro12** · 23-01-2010, 13:20

premetto che è la prima volta che uso mysql (su aruba)

ok avevo tenuto l'inserimento di acces...

codice:

' MySQL Version
DB_CONNECTIONSTRING = "driver={MySQL};server="&MySQLSVR&";port="&MySQLPRT&";"_
					& "uid="&MySQLUID&";pwd="&MySQLPWD&";database="&MySQLDB&";option="&MySQLOPT&""
		


  
livello= oUpload.Form("livello")
nome	= oUpload.Form("nome")
cognome	= oUpload.Form("cognome")
email	= oUpload.Form("email")	  
username	= oUpload.Form("username")
password	= oUpload.Form("password")
dritto	= FileName_Dritto

SQL = "INSERT INTO admin (livello,nome,cognome,email,username,password,dritto) VALUES ('"& livello &"','"& nome &"','"& cognome &"','"& email &"','"& username &"','"& password &"',,'"& dritto &"') "
DB_CONNECTIONSTRING.execute (SQL)
		
		Set DB_CONNECTIONSTRING=Nothing

pero il risultato non cambia.....

**cavicchiandrea** · 23-01-2010, 13:27

A cosa si riferisce la riga /public/upload.asp, line 365 ?

**Giro12** · 23-01-2010, 14:04

Ho utilizzato il file Upload.asp che è con l'upload di baol

codice:

	Public Property Get EOF()
	EOF = Files.EOF 
		end property

Credo si riferisca al nome del file che intendo salvare sul db
credo sia un problema di recupero nome file...........

**cavicchiandrea** · 23-01-2010, 17:04

Cosa significa credo.... se non lo sai te chi pensi ce lo possa dire?
In oltre se installi solo upload funziona?
Consiglio, nel tuo interesse cerca d'essere + collaborativo + che un aiuto sembra un interrogatorio, pertanto inserisci tutte le operazioni/prove fatte e un link pubblico.
Ciao.

**Giro12** · 24-01-2010, 10:46

ok
questo è il link di esempio
http://www.danilogiro.net/prova/add_admin.asp

Questa è la pagina dove recupero i valori iviati dal form e effettuo l'upload nella cartella /public/admin
successivamento dovrei scrivere sul db

codice:


<%

		Dim oUpload
		Set oUpload = new cUpload
		oUpload.AutoRename = True
		oUpload.Overwrite = False
		oUpload.SetPath "/public/admin" 
		oUpload.Load
		While Not oUpload.EOF
			oUpload.Save()
			Select Case lCase(oUpload.Files("InputName"))
				Case "dritto"
					FileName_Dritto = oUpload.GetFileName()
				Case "dritto2"
					FileName_dritto2 = oUpload.GetFileName()
			End Select
			oUpload.MoveNext
		Wend	
		if filename_dritto = "" then
   filename_dritto = "imageno.gif"
end if	

'

' MySQL Version
DB_CONNECTIONSTRING = "driver={MySQL};server="&MySQLSVR&";port="&MySQLPRT&";"_
					& "uid="&MySQLUID&";pwd="&MySQLPWD&";database="&MySQLDB&";option="&MySQLOPT&""
		


  
livello= oUpload.Form("livello")
nome	= oUpload.Form("nome")
cognome	= oUpload.Form("cognome")
email	= oUpload.Form("email")	  
username	= oUpload.Form("username")
password	= oUpload.Form("password")
dritto	= FileName_Dritto


SQL = "INSERT INTO admin (livello,nome,cognome,email,username,password,dritto) VALUES ('"& livello &"','"& nome &"','"& cognome &"','"& email &"','"& username &"','"& password &"',,'"& dritto &"') "
DB_CONNECTIONSTRING.execute (SQL)
		
		Set DB_CONNECTIONSTRING=Nothing				
		

		response.Redirect "add_admin.asp?txt=Amministratore+aggiunto+con+successo+!!!"

%>

Questa è la pagina con il form dove invio i dati

codice:

<form action="db_admin.asp" method="post" class="niceform">
	<fieldset>
    	<legend>Dati personali</legend>
        <dl>
        	<dt><label for="email">Email Address:</label></dt>
            <dd><input type="text" name="email" size="32" maxlength="128" /></dd>
        </dl>
        <dl>
        	<dt><label for="password">Password:</label></dt>
            <dd><input type="text" name="password"  size="32" maxlength="32" /></dd>
        </dl>
        <dl>
        	<dt>
        	  <label for="password">Username:</label>
        	</dt>
            <dd><input type="text" name="username" id="username" size="32" maxlength="32" /></dd>
        </dl>
        <dl>
        	<dt>
        	  <label for="Nome">Nome:</label>
        	</dt>
            <dd><input type="text" name="nome" id="nome" size="32" maxlength="32" /></dd>
        </dl>
        <dl>
        	<dt>
        	  <label for="Cognome">Cognome:</label>
        	</dt>
            <dd><input type="text" name="cognome" id="cognome" size="32" maxlength="32" /></dd>
        </dl>
  
        <dl>
        	<dt><label for="dobMonth">Livello Accesso:</label></dt>
            <dd>
              <select size="1" name="livello" >
                	<option value="1">1</option>
                    <option value="2">2</option>
                    <option value="3">3</option>
                    <option value="4">4</option>
          
              </select>
            </dd>
        </dl>
    </fieldset>
   
    <fieldset>
    	<legend>Upload Immagine</legend>
 
        <dl>
        	<dt>
        	  <label for="upload">Upload a Foto:</label>
        	</dt>
            <dd><input type="file" name="dritto" id="dritto" /></dd>
        </dl>
   
    </fieldset>
    <fieldset class="action">
    	<input type="submit" name="submit" id="submit" value="Submit" />
    </fieldset>
</form>

**cavicchiandrea** · 24-01-2010, 13:56

A) manca ENCTYPE="multipart/form-data" nella form
B) Separa le due operazioni prima salvi l'immagine e quando funziona questo step ti dedichi all'inserimento nel db
C) anche il nome password in un input (password) e deprecato.

P.S. Quanto ti fanno delle domande In oltre se installi solo upload funziona? e corretto rispondere, cosi si capisce che hai letto tutto.
Oltretutto fare domande che passano inosservate è molto fastidio/seccante per chi sta cercando d'aiutarti.

P.S.S. Consiglio rileggi sempre tutto il codice (sia asp che html) più volte una buona parte di errori e dovuta alla sintassi sbagliata tag o funzioni non chiuse, oppure omesse, variabili scritte male etc..

**Giro12** · 24-01-2010, 14:51

Grazie per la risposta nel modificare il file avevo dimenticato di mettere
<form action="db_admin.asp" ENCTYPE="multipart/form-data"

Nel primo post avevo scritto che l'upload funzionava perchè era lo stesso che utilizzavo con acces...
Funziona ancora adesso

Ti ringrazio per l'intervento e la disponibilità nel rispondere alle mie domande e cercare di aiutarmi a far fungere questo script chiedo scusa per non avertelo ripetuto e soprattutto scritto in modo più chiaro

Nel riscrivere il form ho dimenticato ENCTYPE="multipart/form-data" purtroppo per una mia svista

Purtroppo adesso ho ancora il seguente errore

Microsoft VBScript runtime error '800a01a8'

Object required: 'DB_CONNECTIONSTRING'

/prova/db_admin.asp, line 56

quando stampo la qry SQL

codice:

INSERT INTO admin (livello,nome,cognome,email,username,password,dritto) VALUES (4,'nome','cognome','email@email.it','username','password','ninfee_9.jpg')

i dati li recupero tutti sono tutti varchar tranno livello che è int
e questo è l'SQL per l'inserimento

codice:

SQL = "INSERT INTO admin (livello,nome,cognome,email,username,password,dritto) VALUES ("& livello &",'"& nome &"','"& cognome &"','"& email &"','"& username &"','"& password &"','"& dritto &"') "
DB_CONNECTIONSTRING.execute (SQL)

**cavicchiandrea** · 24-01-2010, 15:27

Intanto l'errore è cambiato, io non conosco bene mysql, prova a mettere il campo password [] tra le quadre

Codice PHP:


SQL = "INSERT INTO admin (livello,nome,cognome,email,username,[password],dritto) VALUES ("& livello &",'"& nome &"','"& cognome &"','"& email &"','"& username &"','"& password &"','"& dritto &"') "

DB_CONNECTIONSTRING.execute (SQL)

oppure a cambiarlo con un altro nome, e ancora scrivi la connessione tutta su una riga cosi:

Codice PHP:


DB_CONNECTIONSTRING = "driver={MySQL};server="&MySQLSVR&";port="&MySQLPRT&";"uid="&MySQLUID&";pwd="&MySQLPWD&";database="&MySQLDB&";option="&MySQLOPT

Discussione: Upload Baol + Mysql

Strumenti discussione

Ricerca discussione

Visualizza

Upload Baol + Mysql

Permessi di invio