Notifikationer

Markér alle som læst Log ud

stkol Nybegynder

24. april 2005 - 13:31 Der er 4 kommentarer og
1 løsning

Jmail forårsager problem, men dan ikke debugge!

Hej Folkens

Jeg har lavet et script som indsætter nogle værdier i SQL 2000, genererer en side og sender den videre, men når jeg fletter det ind i Jmail, som jeg så tit har gjordt, kommer den med ERROR 500, og ikke andet, selvom jeg har sat ServerSite debug til! Jeg fatter ikke hvad der sker og håber derfor at i kan hjælpe mig

Scriptet er:

<%@LANGUAGE="VBSCRIPT" %>
<HTML>
<BODY>

<%
Session("uge") = Request.Form("uge")
Session("tekst") = Request.Form("tekst")
Session("rapportnotat") = Request.Form("rapportnotat")
Session("kommendenotat") = Request.Form("kommendenotat")

set dbInsert_connection = Server.CreateObject("ADODB.Connection")
dbInsert_connection.Open Application("ConnectString")

strSql = "INSERT INTO rapportkommentar(uge,tekst,rapportnotat,kommendenotat) values('" & Session("uge") & "','" & Session("tekst") & "','" & Session("rapportnotat") & "','" & Session("kommendenotat") & "')"

dbInsert_connection.execute(strSql)

dbInsert_connection.Close
set dbInsert_connection = Nothing

%>

<%
'####### indhold ############
'## Create db objects and SQL
set indholdConn = Server.CreateObject("ADODB.Connection")
indholdConn.CursorLocation = 3
indholdConn.Open Application("ConnectString")
Set indholdrs = Server.CreateObject("ADODB.Recordset")

indholdSql = "SELECT * FROM indhold where uge = " & trim(Request.form("uge")) & ""

Set indholdrs = indholdConn.Execute(indholdSql)

%>

<%
'####### kommende ############
'## Create db objects and SQL
set kommendeConn = Server.CreateObject("ADODB.Connection")
kommendeConn.CursorLocation = 3
kommendeConn.Open Application("ConnectString")
Set kommenders = Server.CreateObject("ADODB.Recordset")

kommendeSql = "SELECT * FROM kommendeuge where uge = " & trim(Request.form("uge"))+1 & ""

Set kommenders = kommendeConn.Execute(kommendeSql)

%>

<%

Set jmail = Server.CreateObject("JMail.Message")

jmail.AddRecipient "mail@receipient.com", "Receiver Name"
jmail.From = "mail@sender.com", "My Name"

jmail.Subject = "Rapport uge"

jmail.HTMLBody = "<html>"
jmail.appendHTML "<head>"
jmail.appendHTML "<title>Rapport uge</title>"
jmail.appendHTML "</head>"
jmail.appendHTML "<body>"
jmail.appendHTML "Hej "
jmail.appendHTML "<%=Session(""tekst"")%> "
jmail.appendHTML "Møder i ugen der gik: "
jmail.appendHTML "" & Session("rapportnotat") & " "

%>

<%
While not indholdrs.EOF
%>

<%
jmail.appendHTML "<table cellspacing=""0"" cellpadding=""2"" border=""3"" bordercolor=""#000000"">"
jmail.appendHTML "<tr>"
jmail.appendHTML "<td style=""width: 100px"" bgcolor=""#FFFFFF"">Uge:</td>"
jmail.appendHTML "<td style=""width: 250px"" bgcolor=""#FFFFFF"">" & indholdrs("uge") & " </td>"
jmail.appendHTML "</tr><tr>"
jmail.appendHTML "<td style=""width: 100px"" valign=""_top"" bgcolor=""#FFFFFF"">Dato:</td>"
jmail.appendHTML "<td style=""width: 250px"" valign=""_top"" bgcolor=""#FFFFFF"">" & trim(indholdrs("dato")) & "  Kl. " & trim(indholdrs("klokken")) & " </td>"
jmail.appendHTML "</tr><tr>"
jmail.appendHTML "<td style=""width: 100px"" bgcolor=""#FFFFFF"">Kunde:</td>"
jmail.appendHTML "<td style=""width: 250px"" bgcolor=""#FFFFFF"">" & trim(indholdrs("kunde")) & " </td>"
jmail.appendHTML "</tr><tr>"
jmail.appendHTML "<td style=""width: 100px"" bgcolor=""#FFFFFF"">Adresse:</td>"
jmail.appendHTML "<td style=""width: 250px"" bgcolor=""#FFFFFF"">" & trim(indholdrs("modested")) & " </td>"
jmail.appendHTML "</tr><tr>"
jmail.appendHTML "<td style=""width: 100px"" bgcolor=""#FFFFFF"">Mødedeltager:</td>"
jmail.appendHTML "<td style=""width: 250px"" bgcolor=""#FFFFFF"">" & trim(indholdrs("meetwith")) & " </td>"
jmail.appendHTML "</tr><tr>"
jmail.appendHTML "<td style=""width: 100px"" bgcolor=""#FFFFFF"">Org. placering:</td>"
jmail.appendHTML "<td style=""width: 250px"" bgcolor=""#FFFFFF"">" & trim(indholdrs("orgplacering")) & " </td>"
jmail.appendHTML "</tr><tr>"
jmail.appendHTML "<td colspan=""2"" valign=""_top"" bgcolor=""#000000"">Formål: </td>"
jmail.appendHTML "</tr><tr>"
jmail.appendHTML "<td style=""width: 100px"" valign=""_top"" bgcolor=""#FFFFFF""> </td>"
jmail.appendHTML "<td style=""width: 250px"" valign=""_top"" bgcolor=""#FFFFFF"">" & trim(indholdrs("formaal")) & " </td>"
jmail.appendHTML "</tr><tr>"
jmail.appendHTML "<td colspan=""2"" valign=""_top"" bgcolor=""#000000"" bgcolor=""#FFFFFF"">Tilbagemelding/Leads:</td>"
jmail.appendHTML "</tr><tr>"
jmail.appendHTML "<td style=""width: 100px"" valign=""_top"" bgcolor=""#FFFFFF""> </td>"
jmail.appendHTML "<td style=""width: 250px"" valign=""_top"" bgcolor=""#FFFFFF"">" & trim(indholdrs("interessei")) & " </td>"
jmail.appendHTML "</tr><tr>"
jmail.appendHTML "<td style=""width: 100px"" bgcolor=""#FFFFFF"">Emner:</td>"
jmail.appendHTML "<td style=""width: 250px"" bgcolor=""#FFFFFF"">" & trim(indholdrs("emner")) & " </td>"
jmail.appendHTML "</tr><tr>"
jmail.appendHTML "<td colspan=""2"" valign=""_top"" bgcolor=""#000000"">Ordre med derfra:</td>"
jmail.appendHTML "</tr><tr>"
jmail.appendHTML "<td style=""width: 100px"" bgcolor=""#FFFFFF"">Faktureret:</td>"
jmail.appendHTML "<td style=""width: 250px"" bgcolor=""#FFFFFF"">" & trim(indholdrs("fakturavare")) & " </td>"
jmail.appendHTML "</tr><tr>"
jmail.appendHTML "<td style=""width: 100px"" bgcolor=""#FFFFFF"">Demo:</td>"
jmail.appendHTML "<td style=""width: 250px"" bgcolor=""#FFFFFF"">" & trim(indholdrs("demovare")) & " </td>"
jmail.appendHTML "</tr><tr>"
jmail.appendHTML "<td style=""width: 100px"" valign=""_top"" bgcolor=""#FFFFFF"">Opfølgning:</td>"
jmail.appendHTML "<td style=""width: 250px"" valign=""_top"" bgcolor=""#FFFFFF"">" & trim(indholdrs("tilbagemelding")) & " </td>"
jmail.appendHTML "</tr>"
jmail.appendHTML "</table>"
jmail.appendHTML " "
%>

<%
indholdrs.movenext
wend
%>

<%
jmail.appendHTML "Kommende uge: "
jmail.appendHTML "" & Session("kommendenotat") & " "
jmail.appendHTML "<table cellspacing=""0"" cellpadding=""2"" border=""3"" bordercolor=""#000000"">"
jmail.appendHTML "<tr>"
jmail.appendHTML "<td valign=""_top"" bgcolor=""#000000"">Dato</td>"
jmail.appendHTML "<td valign=""_top"" bgcolor=""#000000"">Kunde</td>"
jmail.appendHTML "<td valign=""_top"" bgcolor=""#000000"">Adresse</td>"
jmail.appendHTML "<td valign=""_top"" bgcolor=""#000000"">Mødedeltager</td>"
jmail.appendHTML "<td valign=""_top"" bgcolor=""#000000"">Formål:</td>"
jmail.appendHTML "</tr>"
%>

<%
While not kommenders.EOF
%>

<%
jmail.appendHTML "<tr>"
jmail.appendHTML "<td valign=""_top"" bgcolor=""FFFFFF"">" & trim(kommenders("dato")) & "  Kl. " & trim(kommenders("klokken")) & " </td>"
jmail.appendHTML "<td valign=""_top"" bgcolor=""FFFFFF"">" & trim(kommenders("kunde")) & " </td>"
jmail.appendHTML "<td valign=""_top"" bgcolor=""FFFFFF"">" & trim(kommenders("modested")) & " </td>"
jmail.appendHTML "<td valign=""_top"" bgcolor=""FFFFFF"">" & trim(kommenders("meetwith")) & " </td>"
jmail.appendHTML "<td valign=""_top"" bgcolor=""FFFFFF"">" & trim(kommenders("formaal")) & " </td>"
jmail.appendHTML "</tr>"
%>

<%
kommenders.movenext
wend
%>

<%
jmail.appendHTML "</table>"
jmail.appendHTML " Hilsen"
jmail.appendHTML " Stig :-) "
jmail.appendHTML "</body>"
jmail.appendHTML "</html>"

jmail.Send( "192.168.10.2" )

%>

</BODY>
</HTML>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">

<html>
<head>
<title>Untitled</title>
</head>

<body>

succes

</body>
</html>

Synes godt om

kalp Novice

24. april 2005 - 13:34 #1

I IE tryk funktioner->internet Indstillinger->avanceret og fjern flueben i "vis meddelelser om uskadelige http-fejl"

og fortæl hvad fejlen er når du køre dit script..

Synes godt om

stkol Nybegynder

24. april 2005 - 15:22 #2

Hej Kalp

Den skriver

Microsoft VBScript compilation error '800a0401'

Expected end of statement

/rapport_send.asp, line 59

jmail.From = "mail@sender.com" "Mail sender"
------------------------------^

Synes godt om

kalp Novice

24. april 2005 - 15:27 #3

den brokker sig over denne linje

jmail.From = "mail@sender.com", "My Name"

ved ikke lige hvad løsningen er men lad os prøve lidt forskellige:o)

jmail.From = ""mail@sender.com"", "My Name"

jmail.From = '"mail@sender.com"', "My Name"

hvis ikke det virker så prøv lige at fjerne linjen helt.

Synes godt om

stkol Nybegynder

24. april 2005 - 15:51 #4

Det virkede ikke !, men jeg fandt ud af at problemet lå i at Jmail ikke understøtter Navn på sender, kun på modtager, så da jeg fjernede My Name, så kørte det *SS

Hvis du smider et svar får du dine point :-)

Synes godt om

kalp Novice

24. april 2005 - 15:52 #5

Det får du her:)

glad for det virkede:)

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

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.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS