Visualizzazione dei risultati da 1 a 9 su 9
  1. #1

    Campi che non arrivano dal form...

    Perchè questo code non scrive i campi città, email e nazione nel dbase e manda l'email vuota??? :
    codice:
    <%
    	
    	Nome = request.querystring("Nome")
    	Cognome = request.querystring("Cognome")
    	Citta = request.querystring("Citta")
    	Nazione = request.querystring("Nazione")
    	Email = request.querystring("Email")
    	Data = now()
    			If fileSize > 0 Then
    			Dim connStr
    			connStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("/mdb/curro.mdb")
    		
    			Dim rs
    				Set rs = Server.CreateObject("ADODB.Recordset")
    				
    				rs.Open "Files", connStr, 2, 2
    				
    				rs.AddNew
    					rs("File Name") = fileName
    					rs("File Size") = fileSize
    					rs("File Data").AppendChunk fileData
    					rs("Content Type") = contentType
    					rs("First Name") = NomeInput
    					rs("Last Name") = CognomeInput
    					rs("Email") = Email
    					rs("Citta") = Citta
    					rs("Nazione") = Nazione
    				rs.Update
    				
    				rs.Close
    				Set rs = Nothing
    				
    			Response.Write "<font color=""green"">OK.</font>"
    			
    		Dim objMail, messaggio
    
    messaggio = messaggio & VBcrlf & "Nome = " & Nome & "
    "
    messaggio = messaggio & VBcrlf & "Cognome = " & Cognome & "
    "
    messaggio = messaggio & VBcrlf & "E-mail = " & Email & "
    " 
    messaggio = messaggio & VBcrlf & "Città = " & Citta & "
    "
    messaggio = messaggio & VBcrlf & "Nazione = " & Nazione & "
    "
    messaggio = messaggio & VBcrlf & "Data = " & Data & "
    "
    
    Set objMail = Server.CreateObject("CDONTS.NewMail")
    
    objMail.From = "email@com.com"
    objMail.Cc = "v.@com.com"
    objMail.To = Email
    objMail.Subject = "Ciao."
    objMail.Body = messaggio
    objMail.importance = 2
    objMail.MailFormat = 0
    objMail.BodyFormat = 0
    objMail.Send
    
    Set objMail = Nothing
    				
    		Else
    			Response.Write "<font color=""brown"">NO</font>"
    		End If
    			
    			
    		If Err.number <> 0 Then
    			Response.Write "
    <font color=""red"">Errore</font>"
    		End If
    	%>

  2. #2
    Utente di HTML.it L'avatar di SPEED78
    Registrato dal
    Jan 2003
    Messaggi
    358
    come lo amndi il form post o get?
    se è post devi afre request form e non querystring

  3. #3
    Originariamente inviato da SPEED78
    come lo amndi il form post o get?
    se è post devi afre request form e non querystring
    Grazie, se utilizzo request.form mi dà errore:

    codice:
    Request object error 'ASP 0207 : 80004005' 
    Cannot use Request.Form 
    /Insert.asp, line 125 
    Cannot use Request.Form collection after calling BinaryRead.

  4. #4
    Utente di HTML.it L'avatar di SPEED78
    Registrato dal
    Jan 2003
    Messaggi
    358
    ma il ne form invii anche un file? copiami il form

  5. #5
    Originariamente inviato da SPEED78
    ma il ne form invii anche un file? copiami il form
    Grazie, ecco il form:

    codice:
    <form method="POST" enctype="multipart/form-data" action="Insert.asp" onSubmit="return submitIt(this)">
    	
    	
    	  <td width="162"><font face="Verdana" size="1">Nome * :</font></td>
          <td width="265">
    		<font face="Tahoma">
    		<input type="text" name="Nome" size="20"></font></td></tr>
    	<tr>
    	<td width="162"><font face="Verdana" size="1">Cognome *:</font></td>
        <td width="265">
    		<font face="Tahoma">
    		<input type="text" name="Cognome" size="20" style="font-family: verdana,arial; font-size: 10pt"></font></td>
        </tr>
        <tr>
    	<td width="162"><font face="Verdana" size="1">Città *:</font></td>
        <td width="265">
    		<font face="Tahoma">
    		<input type="text" name="Citta" size="20" style="font-family: verdana,arial; font-size: 10pt"></font></td>
        </tr>
    	<td width="162"><font face="Verdana" size="1">Nazione *:</font></td>
        <td width="265">
    		<font face="Tahoma">
    		<input type="text" name="Nazione" size="20"></font></td></tr>
    	<td width="162"><font face="Verdana" size="1">Email *:</font></td>
        <td width="265">
    		<font face="Tahoma">
    		<input type="text" name="Email" size="20"></font></td></tr>
    	<td width="162"><font face="Verdana" size="1">File Curriculum* :</font></td>
        <td width="265">
    		<font face="Tahoma">
    		<input type="file" name="file" size="20"></font></td></tr>
    	<td width="162"></td><td width="265">
    		<font face="Tahoma">
    		<input type="submit" value="Submit"></font></td></tr>
    	</form>

  6. #6
    Risolto !!!!
    è stato sufficiente eliminare questa parte:
    codice:
    Nome = request.querystring("Nome")
    Cognome = request.querystring("Cognome")
    Citta = request.querystring("Citta")
    Nazione = request.querystring("Nazione")
    Email = request.querystring("Email")
    e funziona tutto alla grande !!!!
    Grazie

  7. #7
    un'ultima cosa come rendo linkabile questa stringa: :master:
    codice:
    Response.Write rs("Email")

  8. #8
    Provo così, ma dà errore:
    codice:
    Response.Write "<a href=""mailto:" & Email & """>" & rs("Email") & "

  9. #9
    Utente di HTML.it L'avatar di 99eros9
    Registrato dal
    Jan 2003
    Messaggi
    2,637
    Response.Write rs(""&Email&"")
    Tala är silver men tiga är guld!
    Pubblica il tuo curriculum
    Segnala il tuo sito
    Ancl

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.