Avatar billede moore Nybegynder
08. december 2004 - 22:00 Der er 14 kommentarer og
1 løsning

Jmail problem

Hej

Hmm.. kan ikke lige få min jmail til at virke her..
Forsøger at, når man trykker submit, så modtager jeg en email, med en bestilling på en cd..

<%

Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = pasmtp.tele.dk
JMail.Sendername = "Bestilling"
JMail.Sender = request.form("f_fornavn")
JMail.Subject = "Bestilling fra " & Request.form("navn") & ""
JMail.AddRecipientEx "musikeren@webspeed.dk", "Bestilling"
JMail.Priority = 1





if request.querystring("mode") = "save" then
  Set objConn = server.createobject("adodb.connection")
  objconn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("../CDBestilling/database.mdb")
  set objRS=server.createobject("ADODB.recordset")

  Fornavn = request.form("f_fornavn")
  Efternavn = request.form("f_efternavn")
  Adresse = request.form("f_adresse")
  Postnummer = request.form("f_postnummer")
  By = request.form("f_by")
  Telefonnummer = request.form("f_telefonnummer")
  Email = request.form("f_email")

  strSQL =  "INSERT INTO Bestilling(Fornavn,Efternavn,Adresse,Postnummer,[By],Telefonnummer,Email) values ('"& Fornavn & "','" & Efternavn  &"','" & Adresse &"','" & Postnummer &"','" & By &"','" & Telefonnummer &"','" & email &"')"
  objConn.execute(strSQL)
  response.write "Takker for din bestilling. Vi sender den hurtigst muligt"
  objConn.close
  Set objConn = nothing
else

%>
Avatar billede cpufan Juniormester
08. december 2004 - 22:05 #1
ligger din hjemmeside hos tdc?
hvis ikke skal du bruge serveraddress på det rigtige webhotel..

men fortæl lige hvilke fejl du får
Avatar billede cpufan Juniormester
08. december 2004 - 22:08 #2
JMail.AddRecipient "musikeren@webspeed.dk", "Bestilling"
Avatar billede moore Nybegynder
08. december 2004 - 22:09 #3
Her er følgende fejl.

Microsoft VBScript runtime error '800a01a8'
Object required: ''

/cdbestilling/maildansk.asp, line 18

Har ikke TDC som udbyder.. men har wannafind.. men har fået at vide jeg skal bruge den *S*
Avatar billede cpufan Juniormester
08. december 2004 - 23:07 #4
og hvilken linie er linie 18?
Avatar billede moore Nybegynder
09. december 2004 - 18:29 #5
linie 18 er :
JMail.ServerAddress = pasmtp.tele.dk
Avatar billede cpufan Juniormester
09. december 2004 - 19:16 #6
JMail.ServerAddress = "pasmtp.tele.dk"
Avatar billede moore Nybegynder
09. december 2004 - 20:23 #7
yepsen.. så kommer der ingen fejl.. men dog heller ingen emails...
skal jeg ikke execute den jmail..  eller er det lige meget
Avatar billede moore Nybegynder
09. december 2004 - 20:37 #8
Her er den nye fejl..
Efter at jeg har indsat følgende..

Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "pasmtp.tele.dk"
JMail.Sendername = "Bestilling"
JMail.Sender = request.form("f_fornavn")
JMail.Subject = "Bestilling fra " & Request.form("navn") & ""
JMail.AddRecipient "musikeren@webspeed.dk"
JMail.execute
Set JMail = Nothing


jmail.SMTPMail error '8000ffff'
The message was undeliverable. All servers failed to receive the message

/CDBestilling/maildansk.asp, line 23

Linie 23 er hvor man executer jmail
Avatar billede cpufan Juniormester
09. december 2004 - 20:42 #9
prøv istedet

JMail.ServerAddress = "localhost"
Avatar billede moore Nybegynder
09. december 2004 - 20:47 #10
hmmm....
Nu kan jeg slet ikke komme ind på siden.. måske jeg lige skal om-arrangere min kode lidt.. så den ikke sender en mail til mig, så snart man logger ind.


Her er hele koden.. kan sq ikke få den til noget..
<%

Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "localhost"
'JMail.ServerAddress = "pasmtp.tele.dk"
JMail.Sendername = "Bestilling"
JMail.Sender = request.form("f_fornavn")
JMail.Subject = "Bestilling fra " & Request.form("navn") & ""
JMail.AddRecipient "musikeren@webspeed.dk"
JMail.execute
Set JMail = Nothing





if request.querystring("mode") = "save" then
  Set objConn = server.createobject("adodb.connection")
  objconn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("../CDBestilling/database.mdb")
  set objRS=server.createobject("ADODB.recordset")

  Fornavn = request.form("f_fornavn")
  Efternavn = request.form("f_efternavn")
  Adresse = request.form("f_adresse")
  Postnummer = request.form("f_postnummer")
  By = request.form("f_by")
  Telefonnummer = request.form("f_telefonnummer")
  Email = request.form("f_email")

  strSQL =  "INSERT INTO Bestilling(Fornavn,Efternavn,Adresse,Postnummer,[By],Telefonnummer,Email) values ('"& Fornavn & "','" & Efternavn  &"','" & Adresse &"','" & Postnummer &"','" & By &"','" & Telefonnummer &"','" & email &"')"
  objConn.execute(strSQL)
  response.write "Takker for din bestilling. Vi sender den hurtigst muligt"
  objConn.close
  Set objConn = nothing
else

%>
Avatar billede tjaz Nybegynder
10. december 2004 - 03:10 #11
Umiddelbart ville jeg nok bruge:

JMail.ServerAddress = "mail.tele.dk"

Som server til at afsende min mail, prøv det :)
Avatar billede moore Nybegynder
10. december 2004 - 19:03 #12
Hmm. virkede ikke..
Bruger den rigtige serveradresse nu..

Men får følgende fejl..

jmail.SMTPMail error '8000ffff'
The message was undeliverable. All servers failed to receive the message

/CDBestilling/maildansk.asp, line 24
Avatar billede moore Nybegynder
12. december 2004 - 13:32 #13
fandt selv fejlen.. så lukker spørgsmålet
Avatar billede cpufan Juniormester
12. december 2004 - 14:43 #14
og hvad var den så?
Avatar billede moore Nybegynder
13. december 2004 - 08:53 #15
Koden skulle se sådan her ud...

Nu smider den desværre ikke noget ind i min DB, men må jo bare finde den fejl på et andet tidspunkt..
<%

Fornavn = request.form("f_fornavn")
Efternavn = request.form("f_efternavn")
Adresse = request.form("f_adresse")
Postnummer = request.form("f_postnummer")
By = request.form("f_by")
Telefonnummer = request.form("f_telefonnummer")
Email = request.form("f_email")

Function SQLstreng
strSQL =  "INSERT INTO Bestilling(Fornavn,Efternavn,Adresse,Postnummer,[By],Telefonnummer,Email) values ('"& Fornavn & "','" & Efternavn  &"','" & Adresse &"','" & Postnummer &"','" & By &"','" & Telefonnummer &"','" & email &"')"

objConn.execute(strSQL)



objConn.close
Set objConn = nothing
End Function


if fornavn <> "" then


set jmail = server.createobject("JMAIL.SMTPMail")
jMail.sendername = request.form("f_fornavn") & request.form("f_efternavn")
jMail.sender = "musikeren@webspeed.dk"
jMail.Subject = "Bestilling af CD"
jMail.ServerAddress = "pasmtp.tele.dk"
jMail.AddRecipient "musikeren@webspeed.dk"
jMail.Body = request.form("f_fornavn") & request.form("f_efternavn") & " Vil gerne bestille en CD. "
jMail.Priority = 1
jMail.execute

response.redirect("bestilt.asp")

end if


%>
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
Kurser inden for grundlæggende programmering

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.

Du kan også logge ind via nedenstående tjenester