Søg
Avatar billede caroc Praktikant
26. februar 2003 - 23:27 Der er 14 kommentarer og
4 løsninger

ASP problem

Når jeg loader denne kode - får jeg ingen fejl - men der kommer heller ingen side frem. En der kan finde fejlen?

<html>
<head></head>
<body>

<%
if Request.ServerVariables("REQUEST_METHOD") = "POST" then

  Set JMail          = Server.CreateObject("JMail.SMTPMail")
  JMail.ServerAddress = "mail.blabla.dk"
  JMail.Sender        = "blabla@blabla.dk"
  JMail.SenderName    = "Konkrrence Sender"
  JMail.Subject      = "Konkurrence svar"
  JMail.AddRecipient  "blabla@blabla.dk"
 
  JMail.Body = "Nyt svar i konkurrencen " & vbCrLf & vbCrLf
  JMail.Body = JMail.Body & "svar : " & Request.Form("svar") & vbCrLf & vbCrLf
  JMail.Body = JMail.Body & "Deltager :" & vbCrLf
  JMail.Body = JMail.Body & "Navn : " & Request.Form("navn") & vbCrLf
  JMail.Body = JMail.Body & "Adresse : " & Request.Form("Adresse") & vbCrLf
  JMail.Body = JMail.Body & "Postnr : " & Request.Form("Postnr") & vbCrLf
  JMail.Body = JMail.Body & "By : " & Request.Form("by") & vbCrLf
  JMail.Body = JMail.Body & "E-mail : " & Request.Form("email") & vbCrLf
  JMail.Body = JMail.Body & vbCrLf
  JMail.Body = JMail.Body & "Hilsen din hjemmeside"
 
  JMail.Execute
 
  Set JMail = Nothing
%>
<center>
  <font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#000000">Tak
  for din deltagelse!</font>
</center>

<% else %>

<form method="POST" action="" id=form1 name=form1>
  <table align="center" width="387">
    <tr>
      <td><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Sprøgsmål:</font></td>
      <td><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><b>Hvorfor
        er natten sort</b></font></td>
    </tr>
    <tr>
      <td valign="top"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Svar:</font></td>
      <td> <font face="Verdana, Arial, Helvetica, sans-serif" size="2">
        <input type="radio" name="svar" value="svar1">
        Fordi kul også er sort<br>
        <input type="radio" name="svar" value="svar2">
        Lyset er væk<br>
        <input type="radio" name="svar" value="svar3">
        Sådan er det bare </font></td>
    </tr>
    <tr>
      <td><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Navn</font></td>
      <td><font face="Verdana, Arial, Helvetica, sans-serif" size="2">
        <input type="text" name="navn">
        </font></td>
    </tr>
    <tr>
      <td><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Adresse</font></td>
      <td><font face="Verdana, Arial, Helvetica, sans-serif" size="2">
        <input type="text" name="Adresse">
        </font></td>
    </tr>
    <tr>
      <td><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Postnr</font></td>
      <td><font face="Verdana, Arial, Helvetica, sans-serif" size="2">
        <input type="text" name="Postnr">
        </font></td>
    </tr>
    <tr>
      <td><font face="Verdana, Arial, Helvetica, sans-serif" size="2">By</font></td>
      <td><font face="Verdana, Arial, Helvetica, sans-serif" size="2">
        <input type="text" name="by">
        </font></td>
    </tr>
    <tr>
      <td><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Email</font></td>
      <td><font face="Verdana, Arial, Helvetica, sans-serif" size="2">
        <input type="text" name="email">
        </font></td>
    </tr>
    <tr>
      <td><font face="Verdana, Arial, Helvetica, sans-serif" size="2"> </font></td>
      <td><font face="Verdana, Arial, Helvetica, sans-serif" size="2">
        <input type="submit" value="Send" name="Send">
        <input type="reset" name="Reset" value="Ryd">
        </font></td>
    </tr>
  </table>
</form>

<% end if %>
</body>
</html>
Avatar billede stig3 Mester
26. februar 2003 - 23:38 #1
Kan det være fordi at du bruger GET, når du loader siden ????

Så laver den ikke noget.

Prøv i stedet:
if Request.ServerVariables("REQUEST_METHOD") = "GET" then

eller lav det om til POST på den side, du kommer fra.
Avatar billede caroc Praktikant
26. februar 2003 - 23:40 #2
nå jeg må kigge på det i morgen.. friserverplads.dk er nede igen igen igen så kan ikke tjekke det..
Eller s tak - og sov godt!!
Avatar billede elkrog Nybegynder
26. februar 2003 - 23:41 #3
Jeps, Stig3 har ret.
Ret POST til GET.
Avatar billede caroc Praktikant
26. februar 2003 - 23:41 #4
ok tak
Avatar billede skg Nybegynder
27. februar 2003 - 08:17 #5
eeerhm... nej ?

well, du har ingen validering af dit forminput ( fy fy ) og så får du også ret mange problemer hvis du ændrer POST til GET.

når man loader en normal side, så ER Request.ServerVariables("REQUEST_METHOD") = "GET", dvs den side ALTID vil sende mailen !

Ret hellere din form til, så den bruger Post når den bliver submitted !


( så skal du heller ikke rette alle steder der står Request.Form(et eller andet) )
Avatar billede coolstar Nybegynder
27. februar 2003 - 09:49 #6
ja du behøves jo ikke skrive request.form("email") - nøjes med at skrive email dvs.

email=request("email") her definere du form feltet email.
så i din jmail body skriver du : JMail.Body = JMail.Body & "E-mail : " & email & vbCrLf

håber det ku hjælpe dig lidt mere på vej...
Avatar billede janeamil Nybegynder
27. februar 2003 - 11:52 #7
Hvorfor sætter du <% Else %> <% END IF %>
Avatar billede the_bma_man Nybegynder
27. februar 2003 - 16:01 #8
Ja i må sku meget undskylde.
Men med mindre jeg fatter minus, er det den samme side, han poster fra, som den, der kører ASP'en.
Og den eneste form, der er i hans kode, bruger method=POST

Eller er det mig, der sover her kl. lidt i fire?
Avatar billede stig3 Mester
27. februar 2003 - 17:08 #9
Nej, det er os andre, der sov :-)
Avatar billede the_bma_man Nybegynder
27. februar 2003 - 21:56 #10
Tak stig - var begyndt at overveje 1. klasse igen :-)
Avatar billede the_bma_man Nybegynder
27. februar 2003 - 22:06 #11
Jeg ved, det lyder som volapyk, men prøv at kommentere linien med
Set JMail = Nothing
ud.
Avatar billede the_bma_man Nybegynder
27. februar 2003 - 22:08 #12
Hvis det ikke er det, så prøv lige at bruge dette:
  dim Body

  Body = "Nyt svar i konkurrencen " & vbCrLf & vbCrLf
  Body = Body & "svar : " & Request.Form("svar") & vbCrLf & vbCrLf
  Body = Body & "Deltager :" & vbCrLf
  Body = Body & "Navn : " & Request.Form("navn") & vbCrLf
  Body = Body & "Adresse : " & Request.Form("Adresse") & vbCrLf
  Body = Body & "Postnr : " & Request.Form("Postnr") & vbCrLf
  Body = Body & "By : " & Request.Form("by") & vbCrLf
  Body = Body & "E-mail : " & Request.Form("email") & vbCrLf
  Body = Body & vbCrLf
  Body = Body & "Hilsen din hjemmeside"

  JMail.Body = Body

i stedet for det, du bruger.
SÅ kører det her i hvert fald.
Avatar billede skg Nybegynder
28. februar 2003 - 06:27 #13
måske burde du også lige sørge for at sætte target i din form ..
Avatar billede the_bma_man Nybegynder
28. februar 2003 - 18:25 #14
Han behøver ikke at sætte target, når han poster til "sig selv".
Avatar billede the_bma_man Nybegynder
28. februar 2003 - 18:25 #15
Hva caroc - fik du det til at virke?
Avatar billede caroc Praktikant
28. februar 2003 - 20:40 #16
er lige kommet hjem -- prøver lige at lege lidt med det - vender tilbage senere..
Avatar billede caroc Praktikant
28. februar 2003 - 20:45 #17
Min kode ser nu sådan her du:
Men virker stadig ikke (www.friserverplads.dk/warner/test.asp)

<%
if Request.ServerVariables("REQUEST_METHOD") = "GET" then

  Set JMail          = Server.CreateObject("JMail.SMTPMail")
  JMail.ServerAddress = "mail.blabla.dk"
  JMail.Sender        = "blabla@blabla.dk"
  JMail.SenderName    = "Konkrrence Sender"
  JMail.Subject      = "Konkurrence svar"
  JMail.AddRecipient  "blabla@blabla.dk"
 
  dim Body

  Body = "Nyt svar i konkurrencen " & vbCrLf & vbCrLf
  Body = Body & "svar : " & Request.Form("svar") & vbCrLf & vbCrLf
  Body = Body & "Deltager :" & vbCrLf
  Body = Body & "Navn : " & Request.Form("navn") & vbCrLf
  Body = Body & "Adresse : " & Request.Form("Adresse") & vbCrLf
  Body = Body & "Postnr : " & Request.Form("Postnr") & vbCrLf
  Body = Body & "By : " & Request.Form("by") & vbCrLf
  Body = Body & "E-mail : " & Request.Form("email") & vbCrLf
  Body = Body & vbCrLf
  Body = Body & "Hilsen din hjemmeside"

  JMail.Body = Body

 
  JMail.Execute
 
  Set JMail = Nothing
%>
Avatar billede the_bma_man Nybegynder
28. februar 2003 - 21:20 #18
Du har stadig ikke fjernet Set JMail = Nothing.
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
Persits.Upload Af bsn i ASP 9 17/09/202611:37 21/09/202615:15
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP 10 25/06/202622:20 04/09/202602:30
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
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
I går 16:15 Internet forsvinder hele tiden Af TTA i Internetforbindelser
23/0920:49 Fejl på Tv2 Play Af Bukse i Browsere
23/0918:11 VB, Lægge 2 celler sammen og skrive den i cellen ved side af Af MC3390 i Excel
21/0910:39 DBA er ikke hvad det tidligere var - desværre! Af ErikHg i Fri debat
18/0919:52 Libre office skriveprogram Af Frank i Office & Kontorpakker
White papers
Flere white papers »