webForumDet fria alternativet

Använda Jmail

ASPur ASP

18 svar · 550 visningar · startad av Melea

MeleaMedlem sedan juli 20033 147 inlägg
#1

Lite OT men kan någon förklara vad Jmail är för något? Behöver man en komponent installerad på servern eller finns den automatiskt installerad i IIS5?

Isåfall, var kan man ladda ner komponenten? Kan man ha den på sin egen webserver som har WinXP?

Mvh

@ndersMedlem sedan juni 200032 969 inlägg
#2

JMail ÄR en mailkomponent som man installerar på servern.
Det ska gå finfint att köra på Windows XP.

Dimac är de som är skyldiga till JMail, och de finns på http://www.dimac.net/ .

Mvh

MeleaMedlem sedan juli 20033 147 inlägg
#3

Vilken av de filer som finns på sidan är det jag ska ha?

Mvh

SebbeMedlem sedan jan. 20032 285 inlägg
#4

Melea skrev:

Vilken av de filer som finns på sidan är det jag ska ha?

Mvh

Den. :)

MeleaMedlem sedan juli 20033 147 inlägg
#5

De tackar jag för :)

Mvh

MeleaMedlem sedan juli 20033 147 inlägg
#6

Fick ett litet problem nu när jag skulle testköra komponenten.

smtpServer = "mitt ip?"
smtpPort = nummer?
mail.ServerAddress = smtpServer & ":" & smtpPort

Om jag nu skriver mitt IP får jag: The message was undeliverable. All servers failed to receive the message... Jag prövade en

Set mail = CreateObject ("JMail.SMTPMail") 
On Error Resume Next
mail.Logging = true
[b]mailkod[/b]
Response.write mail.Log
Response.End

Men det står ingenting där, vad ska jag göra?

Kan som sagt ingenting alls om JMail och har försökt att lösa det genom att söka i forumet men har inte fått något direkt svar.

Hoppas någon har tid att hjälpa mig med detta
Tack på förhand
Mvh

SebbeMedlem sedan jan. 20032 285 inlägg
#7

Kanske går bättre såhär?

Set objMail = Server.CreateObject("JMail.Message")
objMail.Logging = True

objMail.From = "din@mail.com"
objMail.AddRecipent "annans@mail.com"
objMail.Subject = "blabla"
objMail.Body = "hejhej"

If objMail.Send("Din IP?") Then
  Response.Write("Funkade bra!")
Else
  Response.Write(objMail.Log)
End If

Set objMail = Nothing
MeleaMedlem sedan juli 20033 147 inlägg
#8

Jag får fortfarande:
Feltyp:
jmail.SMTPMail (0x8000FFFF)
The message was undeliverable. All servers failed to receive the message

Såhär ser koden ut

<%
dim sender, subject, body, smtpServer, smtpPort

smtpServer = "111.111.111.111" 'mitt ip nummer
smtpPort = 25

sender = Request.Form("sender")
receiver = "hejsan.hej@hej.com" 'min emailadress
subject = Request.Form("subject")
body = Request.Form("body")

Set mail = CreateObject ("JMail.SMTPMail") 

mail.ServerAddress = smtpServer & ":" & smtpPort
mail.Sender = sender
mail.Subject = subject
mail.AddRecipient receiver
mail.ContentType = "text/html"
mail.ISOEncodeHeaders = false 
mail.ContentTransferEncoding = "8bit"
mail.Body = body

mail.Execute 
Set Mail = Nothing

Session("fel") = "meddelandet är nu skickat"
Response.Redirect "../admin.asp?visa=inloggad"
%>

Tack på förhand

Mvh

SebbeMedlem sedan jan. 20032 285 inlägg
#9

Den koden du använder ser ut som koden man använder för v3.7 av JMail. Det är säkert bättre att använda den koden jag skrev tidigare.
Felet kan kanske bero på att smtp-servern på datorn är felaktigt inställd?

JosefMedlem sedan mars 20023 561 inlägg
#10

Har du kollat att SMTP-server är igång?

MeleaMedlem sedan juli 20033 147 inlägg
#11

Hehe, vet ärligt talat inte hur jag gör detta eftersom jag aldrig kört JMail innan, har bara installerat komponenten.

Tacksam för svar!

Mvh

MeleaMedlem sedan juli 20033 147 inlägg
#12

Är det någon som vet vilken komponent Loopia har föresten?

SebbeMedlem sedan jan. 20032 285 inlägg
#13

Melea skrev:

Är det någon som vet vilken komponent Loopia har föresten?

/red Nope, hade fel. Det var JMail. :)

MeleaMedlem sedan juli 20033 147 inlägg
#14

Hehe, ursäkta om jag byter ämne men hur funkar CDONTS? Någon som kan visa lite kod? :)

SebbeMedlem sedan jan. 20032 285 inlägg
#15

Melea skrev:

Hehe, ursäkta om jag byter ämne men hur funkar CDONTS? Någon som kan visa lite kod? :)

Läs min redigering. ;)

MeleaMedlem sedan juli 20033 147 inlägg
#16

Okej :)

Hur pillar jag in deras SMTP i den här koden?

Set objMail = Server.CreateObject("JMail.Message")
objMail.Logging = True

objMail.From = "mellow_design@hotmail.com"
objMail.AddRecipent "jonas.stenberg@hotmail.com"
objMail.Subject = "blabla"
objMail.Body = "hejhej"

If objMail.Send("Din IP?") Then
  Response.Write("Funkade bra!")
Else
  Response.Write(objMail.Log)
End If

Set objMail = Nothing
JosefMedlem sedan mars 20023 561 inlägg
#17

Där det i din kod står "Din IP?" ska det stå SMTPserverns ip, eller domän.

MeleaMedlem sedan juli 20033 147 inlägg
#18

Har fått det att fungera nu! Tack så mkt för all hjälp

Mvh

Li Mu BaiMedlem sedan feb. 20044 inlägg
#19

Även jag får The message was undeliverable. All servers failed to receive the message som felmess... raden den klagar på ser ut så här: jmail.Send(mailserver)

kanske skall nämna att koden är till en webshop.

tack på förhand

/C

138 ms totalt · 3 externa anrop · v20260731065814-full.363dfaf6
136 ms — hämta forumlista (db)
0 ms — hämta statistik (cache)
131 ms — hämta tråd, inlägg och bilagor (db)