Visualizzazione dei risultati da 1 a 3 su 3

Discussione: form

  1. #1
    Utente di HTML.it
    Registrato dal
    Jan 2004
    Messaggi
    94

    form

    salve ragazzi...
    scusate l'ignoranza ma...è la prima volta che ho a che fare con asp...
    ho una pagina htm in cui c'è un form ed ho una pagina asp che dovrebbe inviare i dati del form alla mia email...

    htm:
    <FORM ACTION="contact.asp" METHOD="POST">
    <p align="center"><font face="Bookman Old Style" size="2">Name (of the band leader/referring person):</font></p>
    <p align="center">
    <INPUT TYPE="text" NAME="name" SIZE="20" MAXLENGTH="30"></p>
    <p align="center"><font face="Bookman Old Style" size="2">Surname (of the band leader/referring person):</font></p>
    <p align="center">
    <INPUT TYPE="text" NAME="surname" SIZE="20" MAXLENGTH="30"></p>
    <p align="center"><font face="Bookman Old Style" size="2">Name of the artist/band:</font></p>
    <p align="center">
    <INPUT NAME="bandname" ROWS="10" COLS="60" MAXLENGTH="30" size="20"></p>
    <p align="center"><font face="Bookman Old Style" size="2">Email of the artist/band:</font></p>
    <p align="center">
    <INPUT NAME="email" ROWS="10" COLS="60" MAXLENGTH="50" size="20"></p>
    <p align="center"><font face="Bookman Old Style" size="2">Show/Hide the e-mail of the band:
    </font></p>
    <p align="center"><select size="1" name="showhide"><option selected>Show</option><option>Hide</option></select></p>
    <p align="center"><font face="Bookman Old Style" size="2">Country</font></p>
    <p align="center">
    <INPUT NAME="country" ROWS="10" COLS="60" MAXLENGTH="50" size="20"></p>
    <p align="center"><font face="Bookman Old Style" size="2">City:</font></p>
    <p align="center">
    <INPUT NAME="city" ROWS="10" COLS="60" MAXLENGTH="50" size="20"></p>
    <p align="center"><font face="Bookman Old Style" size="2">Official website/web space (if available):</font></p>
    <p align="center">
    <INPUT NAME="website" ROWS="10" COLS="60" MAXLENGTH="50" size="20"></p>
    <p align="center"><font face="Bookman Old Style" size="2">Any other information:
    </font></p><p align="center">
    <textarea rows="7" name="other" cols="29"></textarea>
    </p><p align="center"><font face="Bookman Old Style" size="2">Little biography (english language only):</font></p><p align="center">
    <textarea rows="7" name="biography" cols="29"></textarea></p>
    <p align="center"></p>
    <p align="center">
    <INPUT TYPE="submit" VALUE="Submit">
    <INPUT TYPE="reset" VALUE="Reset">
    </p>
    </FORM>

    asp:
    <%
    ' Website Contact Form Generator
    ' http://www.tele-pro.co.uk/scripts/contact_form/
    ' This script is free to use as long as you
    ' retain the credit link

    ' declare variables
    Dim EmailFrom
    Dim Subject
    Dim name
    Dim surname
    Dim bandname
    Dim email
    Dim showhide
    Dim country
    Dim city
    Dim website
    Dim other
    Dim biography

    ' get posted data into variables
    EmailFrom = "music@europeanhiphop.com"
    Subject = "New Artist"
    name = Trim(Request.Form("name"))
    surname = Trim(Request.Form("surname"))
    bandname = Trim(Request.Form("bandname"))
    email = Trim(Request.Form("email"))
    showhide = Trim(Request.Form("showhide"))
    country = Trim(Request.Form("country"))
    city = Trim(Request.Form("city"))
    website = Trim(Request.Form("website"))
    other = Trim(Request.Form("other"))
    biography = Trim(Request.Form("biography"))

    ' validation
    Dim validationOK
    validationOK=true
    If (Trim(EmailTo)="") Then validationOK=false
    If (validationOK=false) Then Response.Redirect("error.htm" & EmailFrom)

    ' prepare email body text
    Dim Body
    Body = Body & "name: " & name & VbCrLf
    Body = Body & "surname: " & surname & VbCrLf
    Body = Body & "bandname: " & bandname & VbCrLf
    Body = Body & "email: " & email & VbCrLf
    Body = Body & "showhide: " & showhide & VbCrLf
    Body = Body & "country: " & country & VbCrLf
    Body = Body & "city: " & city & VbCrLf
    Body = Body & "website: " & website & VbCrLf
    Body = Body & "other: " & other & VbCrLf
    Body = Body & "biography: " & biography & VbCrLf

    ' send email
    Dim mail
    Set mail = Server.CreateObject("CDONTS.NewMail")
    mail.To = EmailTo
    mail.From = EmailFrom
    mail.Subject = Subject
    mail.Body = Body
    mail.Send

    ' redirect to success page
    Response.Redirect("ok.htm" & EmailFrom)
    %>

    Grazie

  2. #2
    Utente di HTML.it
    Registrato dal
    Jan 2004
    Messaggi
    94
    nessuno sa dirmi perchè non va??
    quando premo su invia mi fa scaricare la pagina al posto di aprirla in internetwxplorer

  3. #3
    cerchi di far girare la pagina asp in un server che non supporta pagine asp

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.