det er ikke min egen server ... og det kan ikke passe ... for jeg har lige prøvet at køre min anden kode og den virker fint ... der får jeg tilsendt en mail med de oplysninger jeg skal have!
tblaster >> Du skriver: for jeg har lige prøvet at køre min anden kode og den virker fint ... der får jeg tilsendt en mail med de oplysninger jeg skal have
Hvorfor kan du ikke bare bruge den anden kode så (tilpasset)? Eller er de rnoget jeg har overset...?
Yep det er på samme server. Min kode ser sådan ud lige nu:
<% Set Conn = Server.CreateObject("ADODB.Connection") Set rsRecordSet = Server.CreateObject("ADODB.Recordset") Conn.Open "DBQ=" & Server.Mappath("Fagseminar.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"
SQL = "SELECT Ansvarlig from Fagseminar where Fagseminar='" & Session("Fagseminar") & "'"
rsRecordSet.Open SQL, Conn
If not rsRecordSet.EOF Then
set JMail = server.createobject("JMail.SMTPMail") JMail.sender = "Thomas@just2funny.dk" JMail.SenderName = "Webmaster" JMail.subject = "Tilmelding til fagseminar" JMail.AddRecipient "Thomas@dyrlund.dk" JMail.ContentType = "text/plain" JMail.body = "Følgende har tilmeldt sig til fagseminaren." JMail.priority = 1 JMail.maildomain = "mail.just2funny.dk" JMail.silent = false JMail.execute JMail.close()
end if
%>
Og min database (Fagseminar.mdb) indholder en tabel der hedder Fagseminar. I denne er der en kolonne der hedder Ansvarlig, hvori der er en mail adresse.
Bare en tanke: Der kunne være nogle restriktioner på mail serveren, der forhindrer dig i at sende udenfor dit domæne. Prøv at sende til den samme adresse som du sender fra, altså:
Det jeg tænker på er, at du skriver: If not rsRecordSet.EOF Then
set JMail = server.createobject("JMail.SMTPMail") Hvad nu hvis du slet ikke kommer så langt? Hvis rsRecordSet er EOF? Har du en Session("Fagseminar") ?
Udover at de 2 scripts kører på samme server, kører de så også på samme site og med samme rettigheder ? Hvis dine scripts er (nærmest) identiske og de ikke virker ens, kan det altså kun være noget rettigheds- eller opsætningsmæsigt i min verden.
Her er den kode som jeg har som jeg ved virker ... så kan I jo lige ændre den som I ville have gjort og så kan vi se om det er en eller anden latterlig fejl jeg har lavet!
Eagleeye ... den sidste kode som jeg har smidt virker fint hos mig ... så er det bare at jeg har ændret lidt i den fordi jeg skulle bruge den et andet sted på min side men på samme server og så sker der intet. Jeg fik det hele ændret til:
<% Set Conn = Server.CreateObject("ADODB.Connection") Set rsRecordSet = Server.CreateObject("ADODB.Recordset") Conn.Open "DBQ=" & Server.Mappath("Fagseminar.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"
SQL = "SELECT Ansvarlig from Fagseminar where Fagseminar='" & Session("Fagseminar") & "'"
rsRecordSet.Open SQL, Conn
If not rsRecordSet.EOF Then
set JMail = server.createobject("JMail.SMTPMail") JMail.sender = "Thomas@just2funny.dk" JMail.SenderName = "Webmaster" JMail.subject = "Tilmelding til fagseminar" JMail.AddRecipient rsRecordSet("Ansvarlig") JMail.ContentType = "text/plain" JMail.body = "Følgende har tilmeldt sig til fagseminaren." JMail.priority = 1 JMail.maildomain = "mail.just2funny.dk" JMail.silent = true JMail.execute JMail.close()
end if
%>
Den melder ikke fejl men den sender heller ingen mail :-(
eegleeye> Det har du måske ret i, dog så jeg den i eksemplet på jmail's wEB. Men jeg ville bruge det til at debugge efter fejl. Der er da ikke noget der er mere irreterende end kode der virker et sted men ikke et andet !! Det viser sig til at være en banan... banal fejl ! ;-)
Det jeg tænker på er, at du skriver: If not rsRecordSet.EOF Then
set JMail = server.createobject("JMail.SMTPMail") Hvad nu hvis du slet ikke kommer så langt? Hvis rsRecordSet er EOF? Har du en Session("Fagseminar") ?
Skovtrold ... jeg droppede det der for at se om det var det der var galt ... der prøvede jeg at slette det med databasen men det gav jo bare samme problem ... ingen fejl og ingen mail!
<% if Session("fornavn1") <> "" then %> <% response.write Session("fornavn1") %> <% response.write Session("efternavn1") %><br> <% end if %> <% if Request.Form("fornavn2") <> "" then %> <% response.write Request.Form("fornavn2") %> <% response.write Request.Form("efternavn2") %><br> <% end if %> <% if Request.Form("fornavn3") <> "" then %> <% response.write Request.Form("fornavn3") %> <% response.write Request.Form("efternavn3") %><br> <% end if %> <% if Request.Form("fornavn4") <> "" then %> <% response.write Request.Form("fornavn4") %> <% response.write Request.Form("efternavn4") %><br> <% end if %> <% if Request.Form("fornavn5") <> "" then %> <% response.write Request.Form("fornavn5") %> <% response.write Request.Form("efternavn5") %><br> <% end if %></td> </tr> <tr> <td width="177"> Betaling via: </td> <td width="312"><%=Session("betaling")%></td> </tr> </table> <p> <% rs.MoveNext End If Next %>
'Så kan du ligge bodyTxt ind i JMail body. JMail.body = bodyTxt
Der er nogle request.form("fornavn2") osv som er med skal de være det? jeg har kun fjerne Fatura nummer som du skrev. Det er mulig du skal havde "<html><body>" & bodyTxt & "</body></htm>" for det virker som en hjemme side..
Nej vent ... nu skriver den de navne den skal ... men når Session("fornavn2") = "" så laver den bare en tom plads. Ikke noget med at ikke skrive noget!
er tvungen mellemrum i HTML det kan være man kan nøjes med normalt mellemrum " ".
Hvis du vil ungå en tom linie skal du flytte disse linier ind i den tilhørne if: bodyTxt = bodyTxt & VbCrLf
Sådan her: if Session("fornavn2") <> "" then bodyTxt = bodyTxt & Session("fornavn2") & " " & Session("efternavn2") bodyTxt = bodyTxt & VbCrLf end if
Takker mange gange ... der var også de ekstra 40 point som lovet :-D
Synes godt om
Ny brugerNybegynder
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.
