Ændring af script fra Jmail til chili!mail

Kan du komme med originalkoden så man har en anelse om hvordan koden skal være???

Det kan jeg. Drop en mail på dsl62555@vip.cybercity.dk og den er på vej.

Her er hvad jeg er kommet frem til:

<%
NL = vbCrlF
body = "Kontakt fra Netcure.dk" & NL
body = body & " " & NL
body = body & "Evt. Firmanavn: " & Request.form("firmanavn") & NL
body = body & "Kontaktperson: " & Request.form("kontaktperson") & NL
body = body & "Adresse: " & Request.form("adresse") & NL
body = body & "Adresse: " & Request.form("postnummerby") & NL
body = body & "Tlf: " & Request.form("telefon") & NL
body = body & "Email: " & Request.form("email") & NL
body = body & "Besked: " & Request.form("besked") & NL
body = body & " " & NL
body = body & "Tak for Deres henvendelse. NetCure vil besvare henvendelsen indenfor 1-12 timer. " & NL
body = body & " " & NL
body = body & "MVH Netcure" & NL

Set mailer = Server.CreateObject("CDONTS.NewMail")
mailer.To "info@netcure.dk;" & Request.form("email")
mailer.From = "Netcure <info@netcure.dk>"
mailer.Subject = "Kontakt fra Netcure.dk"
mailer.Body = body
mailer.Host = "smtp1.b-one.nu"
mailer.Importance = 1
'mailer.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
'Jeg kunne ikke finde nogen AddHeader funktion i chilimail desværre
mailer.Send
%>

Resten af siden skal selvfølgelig bare være som før...

Microsoft VBScript runtime error '800a01c3'

Object not a collection: 'mailer.To'

/kontakt.asp, line 25

Prøv at skrive:
mailer.To Request.form("email") & ";info@netcure.dk;"

Har ´desværre ikke selv mulighed for at teste det :-(

Microsoft VBScript runtime error '800a01c3'

Object not a collection: 'mailer.To'

/kontakt.asp, line 24


Linie 24 er den nye linie

Hvad hvis du kun skriver
mailer.To Request.form("email")
Eller
mailer.To "info@netcure.dk;"
???

Det samme ...

Prøv at lave et script hvor der kun står:

<%
Set mail = Server.CreateObject("CDONTS.NewMail")
mail.To = "info@netcure.dk"
mail.From = "MailTest"
mail.Body = "En test af Chili!Mail"
mail.Host = "smtp1.b-one.nu"
mail.Send
%>

Det virker.

Forresten skal du bruge din egen udbyders smtp server i dit script...
mail.Host = "vip.cybercity.dk"
Da b-one ikke tillader brug af deres smtp server i scripts

Fra deres website:
Hvis du ønsker at sende e-mail fra din web-side, via et script, kan dette naturligvis godt lade sig gøre. Her skal du bruge vores interne smtp-serveradresse som lydder: smtp1.b-one.nu.

Hvad med:

<%
NL = vbCrlF
body = "Kontakt fra Netcure.dk" & NL
body = body & " " & NL
body = body & "Evt. Firmanavn: " & Request.form("firmanavn") & NL
body = body & "Kontaktperson: " & Request.form("kontaktperson") & NL
body = body & "Adresse: " & Request.form("adresse") & NL
body = body & "Adresse: " & Request.form("postnummerby") & NL
body = body & "Tlf: " & Request.form("telefon") & NL
body = body & "Email: " & Request.form("email") & NL
body = body & "Besked: " & Request.form("besked") & NL
body = body & " " & NL
body = body & "Tak for Deres henvendelse. NetCure vil besvare henvendelsen indenfor 1-12 timer. " & NL
body = body & " " & NL
body = body & "MVH Netcure" & NL

Set mailer = Server.CreateObject("CDONTS.NewMail")
mailer.To "info@netcure.dk"
mailer.From = "Netcure"
mailer.Subject = "Kontakt fra Netcure.dk"
mailer.Body = body
mailer.Host = "smtp1.b-one.nu"
mailer.Send
%>

Microsoft VBScript runtime error '800a01c3'

Object not a collection: 'mailer.To'

/kontakt.asp, line 24

OK... Det havde jeg ikke lige set...

<%
NL = vbCrlF
body = "Kontakt fra Netcure.dk" & NL
body = body & " " & NL
body = body & "Evt. Firmanavn: " & Request.form("firmanavn") & NL
body = body & "Kontaktperson: " & Request.form("kontaktperson") & NL
body = body & "Adresse: " & Request.form("adresse") & NL
body = body & "Adresse: " & Request.form("postnummerby") & NL
body = body & "Tlf: " & Request.form("telefon") & NL
body = body & "Email: " & Request.form("email") & NL
body = body & "Besked: " & Request.form("besked") & NL
body = body & " " & NL
body = body & "Tak for Deres henvendelse. NetCure vil besvare henvendelsen indenfor 1-12 timer. " & NL
body = body & " " & NL
body = body & "MVH Netcure" & NL

Set mail = Server.CreateObject("CDONTS.NewMail")
mail.To "info@netcure.dk"
mail.From = "Netcure"
mail.Body = body
mail.Host = "smtp1.b-one.nu"
mail.Send
%>

Microsoft VBScript runtime error '800a01c3'

Object not a collection: 'mail.To'

/kontakt.asp, line 24


Det skal siges at de kører ASP på unix. Der er vist noget med små og store bogstaver der... ?

Sagde du ikke at
<%
Set mail = Server.CreateObject("CDONTS.NewMail")
mail.To = "info@netcure.dk"
mail.From = "MailTest"
mail.Body = "En test af Chili!Mail"
mail.Host = "smtp1.b-one.nu"
mail.Send
%>
virkede???

Check din mail :-)

Hvad hvis du skriver:

NL = Chr(13) & Chr(10)
Istedet for
NL = vbCrlF
???

Ændrer ikke noget. Giver fejl i samme linie som tidligere

Et sidste forsøg inden jeg dropper det for idag ihvertfald...

<%
Set mail = Server.CreateObject("CDONTS.NewMail")
mail.To "info@netcure.dk"
mail.From = "Netcure"
body = "Kontakt fra Netcure.dk" &Chr(13)&Chr(10)
body = body & " " &Chr(13)&Chr(10)
body = body & "Evt. Firmanavn: " & Request.form("firmanavn") &Chr(13)&Chr(10)
body = body & "Kontaktperson: " & Request.form("kontaktperson") &Chr(13)&Chr(10)
body = body & "Adresse: " & Request.form("adresse") &Chr(13)&Chr(10)
body = body & "Adresse: " & Request.form("postnummerby") &Chr(13)&Chr(10)
body = body & "Tlf: " & Request.form("telefon") &Chr(13)&Chr(10)
body = body & "Email: " & Request.form("email") &Chr(13)&Chr(10)
body = body & "Besked: " & Request.form("besked") &Chr(13)&Chr(10)
body = body & " " &Chr(13)&Chr(10)
body = body & "Tak for Deres henvendelse. NetCure vil besvare henvendelsen indenfor 1-12 timer. " &Chr(13)&Chr(10)
body = body & " " &Chr(13)&Chr(10)
body = body & "MVH Netcure" &Chr(13)&Chr(10)
mail.Body = body
mail.Host = "smtp1.b-one.nu"
mail.Send
%>

Microsoft VBScript runtime error '800a01c3'

Object not a collection: 'mail.To'

/kontakt.asp, line 9


Bemærm at det nu er i dnne linie: mail.To "info@netcure.dk"

Du mangler et = efter mail.To:

mail.To = "info@netcure.dk"