Søg
Avatar billede webdrengen Nybegynder
15. december 2003 - 23:10 Der er 10 kommentarer og
1 løsning

Indsætte Jmail i formular.

Jeg har denne formular. jeg har bare det problem at jeg ikke forstår at sammen sætte det med Jmail. Håber at der en der vil hjælpe mig.


<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>
<form name="form1" method="post" action="">
  <table width="600" border="0">
    <tr>
      <td width="191"><div align="right">Navn::</div></td>
      <td colspan="2"><input type="text" name="textfield"></td>
    </tr>
    <tr>
      <td><div align="right">Adresse: </div></td>
      <td colspan="2"><input type="text" name="textfield2"></td>
    </tr>
    <tr>
      <td><div align="right">By:</div></td>
      <td colspan="2"><input type="text" name="textfield3"></td>
    </tr>
    <tr>
      <td><div align="right">Post nr:</div></td>
      <td colspan="2"><input type="text" name="textfield4"></td>
    </tr>
    <tr>
      <td><div align="right">Telefon nr:</div></td>
      <td colspan="2"><input type="text" name="textfield5"></td>
    </tr>
    <tr>
      <td><div align="right">Jeg &oslash;nsker at bestille:</div></td>
      <td width="144"> <div align="left">
          <input type="checkbox" name="checkbox" value="checkbox">
          ASP Server </div></td>
      <td width="251"> <div align="left">
          <input type="checkbox" name="checkbox2" value="checkbox">
          PHP Server</div></td>
    </tr>
    <tr>
      <td><div align="right">Jeg &oslash;nsker denne st&oslash;relse:</div></td>
      <td colspan="2"><select name="select">
          <option>Kom i gang</option>
          <option>Lille</option>
          <option>Standard</option>
          <option>Familie</option>
          <option>Stor</option>
          <option>Super 500</option>
          <option>Mail hotel</option>
        </select></td>
    </tr>
    <tr>
      <td><div align="right">Jeg &oslash;nsker dette til webhotellet:</div></td>
      <td colspan="2"><select name="select2">
          <option>Ekstra 50 bm plads</option>
          <option>Posthotel</option>
          <option>1 stk. MySql</option>
          <option>Ekstra e-mail</option>
          <option>Online statistik</option>
        </select></td>
    </tr>
    <tr>
      <td><div align="right">&Oslash;nsker du at k&oslash;be dom&aelig;ne?:</div></td>
      <td colspan="2"><div align="center">Ja. Dom&aelig;ne navn:
          <input type="text" name="textfield6">
          <input type="checkbox" name="checkbox3" value="checkbox">
          Nej </div></td>
    </tr>
    <tr>
      <td>&nbsp;</td>
      <td colspan="2"><div align="center"> Jeg vil flytte dom&aelig;ne navn
          <input type="text" name="textfield7">
        </div></td>
    </tr>
    <tr>
      <td>&nbsp;</td>
      <td colspan="2"><div align="center">Fra webhotel (Web adresse)
          <input type="text" name="textfield8">
        </div></td>
    </tr>
    <tr>
      <td><div align="right">Jeg &oslash;nsker disse E-mail adresser:</div></td>
      <td><input type="text" name="textfield9"> </td>
      <td>Skriv kun det du vil have foran dom&aelig;net</td>
    </tr>
    <tr>
      <td><div align="right">Kommentar eller andet:</div></td>
      <td colspan="2"><textarea name="textarea" cols="45" rows="10"></textarea></td>
    </tr>
    <tr>
      <td><div align="right"> </div></td>
      <td colspan="2">&nbsp; </td>
    </tr>
    <tr>
      <td>&nbsp;</td>
      <td colspan="2"><input name="Submit" type="submit" id="Submit3" value="Send Bestilling">
        <input type="submit" name="Submit2" value="Slet Bestilling"></td>
    </tr>
  </table>
</form>
</body>
</html>
Avatar billede eagleeye Praktikant
15. december 2003 - 23:19 #1
Princippet er du lavet noget kode som dette:

<% if request.Servervariables("REQUEST_METHOD") = "POST" then

  Set JMail = Server.CreateObject("JMail.SMTPMail")
  JMail.ServerAddress = "mail.your_domain_name.com"
  JMail.Sender = "you@your_domain_name.com" 'Sender
  JMail.Subject = "Form post"
  JMail.AddRecipient("you@your_domain_name.com") 'modtager
 
body = "Hej" & vbCrLf
body = body  & "Du har mail fra din hjemmeside" & vbCrLf
body = body  & "Navn = " & Request.Form("textfield") & vbCrLf
body = body  & "Adresse = " & Request.Form("textfield2") & vbCrLf
body = body  & "By = " & Request.Form("textfield3") & vbCrLf
body = body  & "Post nr. = " & Request.Form("textfield4") & vbCrLf

Jmail.Body = body

  JMail.Execute
  Set JMail = Nothing
end if
%>
Avatar billede eagleeye Praktikant
15. december 2003 - 23:22 #2
Koden kan du ligge på samme side som formen eller en helt ny side som du angiver i action delen i form tagen. Hvis du ligger det på samme side så kan det ligge i starten af filen så koden ligger før <html> tags:

<%
...ASP koden
%>
<html>
..form'en
</html>
Avatar billede eagleeye Praktikant
15. december 2003 - 23:43 #3
Eks på hele JMail koden...


<% if request.Servervariables("REQUEST_METHOD") = "POST" then

  Set JMail = Server.CreateObject("JMail.SMTPMail")
  JMail.ServerAddress = "mail.your_domain_name.com"
  JMail.Sender = "you@your_domain_name.com" 'Sender
  JMail.Subject = "Form post"
  JMail.AddRecipient("you@your_domain_name.com") 'modtager
 
body = "Hej" & vbCrLf
body = body  & "Du har mail fra din hjemmeside" & vbCrLf
body = body  & "Navn = " & Request.Form("textfield") & vbCrLf
body = body  & "Adresse = " & Request.Form("textfield2") & vbCrLf
body = body  & "By = " & Request.Form("textfield3") & vbCrLf
body = body  & "Post nr: = " & Request.Form("textfield4") & vbCrLf
body = body  & "Telefon nr: = " & Request.Form("textfield5") & vbCrLf
body = body  & "Ønsker at bestille = "
if Request.Form("checkbox") <> "" then body = body  & "ASP"
if Request.Form("checkbox2") <> "" then body = body  & "PHP"
body = body  & vbCrLf
body = body  & "Ønsker størrelse = " & Request.Form("select") & vbCrLf
body = body  & "Ønsker webhotellet = " & Request.Form("select2") & vbCrLf
body = body  & "Domænenavn = " & Request.Form("textfield6") & vbCrLf
body = body  & "Ønsker at købe domæne = "
if Request.Form("checkbox3") = "" then
  body = body  & "Ja"  & vbCrLf
else
  body = body  & "Nej" & vbCrLf
end if
body = body  & "Flyt Domænenavn = " & Request.Form("textfield7") & vbCrLf
body = body  & "Fra webhotel (Web adresse) = " & Request.Form("textfield8") & vbCrLf
body = body  & "Ønsker disse E-mail adresser = " & Request.Form("textfield9") & vbCrLf
body = body  & "Kommentar eller andet = " & Request.Form("textarea") & vbCrLf

body = body  & vbCrLf "Med venlig hilsen min side"

Jmail.Body = body

  JMail.Execute
  Set JMail = Nothing
end if
%>
Avatar billede webdrengen Nybegynder
16. december 2003 - 00:19 #4
jeg prøver lige at lege lidt med det. Vender tilbage
Avatar billede webdrengen Nybegynder
16. december 2003 - 00:26 #5
hvad med action=""> hvad skal der stå der?
Avatar billede eagleeye Praktikant
16. december 2003 - 00:28 #6
Der skal stå filnavnet på den fil ASP koden ligger i.
Avatar billede webdrengen Nybegynder
16. december 2003 - 00:41 #7
okay hvordan laver jeg så disse 2 muligheder ikke behøver at blive valgt?


<td><div align="right">Jeg &oslash;nsker dette til webhotellet:</div></td>
      <td colspan="2"><select name="select2">
          <option>Ekstra 50 bm plads</option>
          <option>Posthotel</option>
          <option>1 stk. MySql</option>
          <option>Ekstra e-mail</option>
          <option>Online statistik</option>
        </select></td>




<td><div align="right">Jeg &oslash;nsker denne st&oslash;relse:</div></td>
      <td colspan="2"><select name="select">
          <option>Kom i gang</option>
          <option>Lille</option>
          <option>Standard</option>
          <option>Familie</option>
          <option>Stor</option>
          <option>Super 500</option>
          <option>Mail hotel</option>
        </select></td>
Avatar billede webdrengen Nybegynder
16. december 2003 - 01:39 #8
det hele gik fint, helt uden de store problemer. Det enste jeg mengler er en løsning på de drop down lister.
Avatar billede eagleeye Praktikant
16. december 2003 - 09:29 #9
Normalt har man så en "dummy" i topppen som eksempelvis siger Ingen valgt eller vælg..:

<option>Ingen valgt</option>


Så den er først i listen:

<td><div align="right">Jeg &oslash;nsker dette til webhotellet:</div></td>
      <td colspan="2"><select name="select2">
          <option>Ingen valgt</option>
          <option>Ekstra 50 bm plads</option>


På samme måde kan den anden laves.
Avatar billede eagleeye Praktikant
16. december 2003 - 09:30 #10
Eller hvis den slet ikke skal skrive noget i mailen kan du lave disse to linjer:


body = body  & "Ønsker størrelse = " & Request.Form("select") & vbCrLf
body = body  & "Ønsker webhotellet = " & Request.Form("select2") & vbCrLf



om til disse 2 linjer så den lige tjekker med en if sætning om der er valgt noget:

if Request.Form("select") <> "" then body = body  & "Ønsker størrelse = " & Request.Form("select") & vbCrLf
if Request.Form("select2") <> "" then body = body  & "Ønsker webhotellet = " & Request.Form("select2") & vbCrLf
Avatar billede webdrengen Nybegynder
16. december 2003 - 10:02 #11
okay...tak for den dejlige hjælp
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP 9 25/06/202622:20 29/06/202621:55
Tjek alle checkbox i form Af bsn i ASP 4 18/05/202601:57 19/05/202613:33
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
ASP classic Af bsn i ASP 8 28/10/202423:11 30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP 5 23/05/202409:56 24/05/202400:02
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
27/0821:03 Kan man få Word viewer gratis Af Strawberry i Word
26/0813:28 Findes der en brugsanvisning til : "ONKYO Stereo Casette - Tape Deck - R1" Af Ikke-ekspert i Musik & videoafspillere
24/0820:07 Libra Office 26.2.5.2 - Er sort - Kan an ændre til lysere baggrund ? (Windows 11) Af Ikke-ekspert i Office & Kontorpakker
24/0811:24 Hvor kan jeg finde hjælp til at flytte fra min gamle Samsung Flip4 til min nye Samsung Galaxy S24 Af vbr i Apps til Android
24/0811:16 problem med mailbesked Af Pestilensen i Excel
White papers
Flere white papers »