Cdonts till Jmail

Hej,

Kolla in denna länk.
http://www.dimac.net/Products/w3JMail/Version43/Examples/Simple.htm

Exempel på de saker du behöver, avsändare, mottaggare, ämne osv.

Jo men i detta fall så vill jag att den skall hämta en kod i databasen, är det ingen som vet hur man skriver om koden ovanför lättast .

kolla

Kan man göra så här men jag får ändå felmeddelande, Internt serverfel???

<%
strMail = trim(Request.Form("email")) 
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source = "& Server.MapPath("databas/main.mdb")
SQL = "SELECT * FROM login WHERE email = '"& strMail &"'"
Set RecSet = Connect.Execute(SQL) 
If RecSet.EOF Then 
Response.Write "<font color=red><center><br><br><br><br>Den angivna mailadressen finns inte, försök igen.</font>" 
Else 

strUserMail = RecSet("email") 
strUserPass = RecSet("password") 

Set objMessage = Server.CreateOBject("JMail.Message")
objMessage.From = "info@ernstsonfoto.se" 
'# Till...vi har ju värdet i email från formuläret 
objMessage.To = strmail 
'# Ämnet 
objMessage.Subject = "Ditt lösenord:"
'# Själva meddelandet 
objMessage.Body = "ditt lösenord är: "& strUserPass & vbcrlf & vbcrlf & vbcrlf _ 
 
& "Här kommer dit lösenord www.ernstsonfoto.se" 

'# Skicka skiten 
objMessage.Send("mail.server.nu")
'# Meddelande så användaren vet att mailet är skickat 
Response.Write "<center><br><br><br><br>Ditt lösenord är skickat till: " & strmail 

'# Stäng alla objekt & kopplingar enligt god sed 
Set objMessage = Nothing 

RecSet.Close
Set RecSet = Nothing 
Connect.Close
Set Connect = Nothing 
end if 
%>

1. Stäng av snälla felmeddelanden i IE eller använd en annan webbläsare
2. Läs igenom exemplet
3. Använd AddRecipient, inte To
4. SQL Injection!

Hej igen

Jag får fortfarande inte det att fungera hur ska jag göra hoppas att det är någon som kan och vill hjälpa mig med att få scriptet att fungera?

Inte om du inte berättar vad som går fel.