webForumDet fria alternativet

Angående JMail

ASP

15 svar · 701 visningar · startad av Brazzan

Medlem sedan apr. 200367 inlägg
Frågan#1

Nån som kan förklara för mig hur jag ska installera JMail på min IIS server för att få det fungera?? Jag har programet och jag har läst manualen, men jag fattar inte. Kan va att jag e trög?

Medlem sedan mars 20016 260 inlägg
#2

Japp det kan det ;)

Nej men seriöst, ta ett av exempeln som finns och modifiera det, det är det enklaste sättet att göra det på.

Medlem sedan apr. 200367 inlägg
#3

Alltså, jag fattar inte. Först måste jag installera det. Ok det har jag gjort. C:/program osv osv. Sen ska jag registrera så IIS fattar att det e installerat(Så har jag förstått det i alla fall). Men jag fattar inte hur jjag ska registrera det. jag har kodat allt klart. Men nu fattas det bara själva JMail

Medlem sedan feb. 20011 198 inlägg
#4

Börja såhär.

set jmail = server.createobject("jmail.smtpmail")
Medlem sedan apr. 200367 inlägg
#5

Jag får följande fel när jag kör scriptet.

Teknisk information (för supportpersonal)

Feltyp:
Körningsfel i Microsoft VBScript (0x800A01C2)
Fel antal argument eller felaktig egenskapstilldelning.: 'AddRecipient'
/web/order.asp, line 74

Webbläsare:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)

Sida:
POST 150 bytes to /web/order.asp

POST Data:
namn=sdad&adress=sdfdsd&postnr1=23&postnr2=33&postadress=asdas&tfn1=32&tfn2=23&epost=stoffeg@hotmail.com&ovrigt=ds&Submit2=Skicka+best%E4llning+%3E%3E

Tid:
den 21 juli 2004, 22:22:06

Mer information:
Microsoft Support

Såhär ser koden ut:

<!--#include file="installningar.asp"-->
<%
Response.Buffer = true

namn = Request.Form("namn")
adress = Request.Form("adress")
postnr1 = Request.Form("postnr1")
postnr2 = Request.Form("postnr2")
padress = Request.Form("postadress")
tfn1 = Request.Form("tfn1")
tfn2 = Request.Form("tfn2")
epost = Request.Form("epost")
ovrigt = Request.Form("ovrigt")
info = Array(namn,adress,postnr1,postnr2,padress,tfn1,tfn2,epost,ovrigt)
info2 = ""
For i = 0 to 8
info2 = info2 & info(i)
IF Not i = 8 then
info2 = info2 & "|"
END IF
Next
For i = 0 to 7
IF NOT len(info(i)) <> 0 then
Session("webshopfel") = "Du glömde att fylla i något fält"
session("falt") = info2
Response.Redirect Request.ServerVariables("HTTP_REFERER")
END IF
Next

IF len(info(2)) > 5 then
Session("webshopfel") = "Felaktigt postnummer"
Session("falt") = info2
Response.Redirect Request.ServerVariables("HTTP_REFERER")
END IF

Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" &Server.MapPath("webshop.mdb")
Session.Lcid = 1053

varde = Request.Cookies(""& Session.SessionID &"")
hamta = Split(varde,"&")
ReDim MyArray(4,Ubound(hamta))
for x = 0 to ubound(hamta)
hamta2 = Split(hamta(x),"=")
IF Len(hamta2(0)) > 0 AND len(hamta2(1)) > 0 then
SQL = "SELECT * FROM produkter WHERE id =" & int(hamta2(0))
Set RecSet = Connect.Execute(SQL)
MyArray(0,x) = hamta2(0)
MyArray(1,x) = hamta2(1)
MyArray(2,x) = RecSet("artnr")
MyArray(3,x) = RecSet("namn")
MyArray(4,x) = RecSet("pris")

RecSet.Close
Set RecSet = nothing
END IF
next
set jmail = server.createobject("jmail.smtpmail")

jmail.AddRecipient ""& eposten &"", ""& eposten &""
jmail.From = "" & info(7) & ""
jmail.Subject = "Beställning"
jmail.appendHTML "<font face=verdana size=1>"
For i = 0 To Ubound(myArray,2)
IF Len(MyArray(0,i)) > 0 then
jmail.appendHTML "<b>Art.nr: </b>" & MyArray(2,i) & "<br>"
jmail.AppendHTML "<b>Produkt: </b>" & MyArray(3,i) & "<br>"
jmail.AppendHTML "<b>Antal: </b>" & MyArray(1,i) & "<br>"
jmail.AppendHTML "-------------------------------------------<br>"
IF i = Ubound(myArray,2) then
jmail.AppendHTML " <br>"
END IF
END IF
Next
jmail.appendHTML "<b>Namn: </b>" & info(0) & "<br>"
jmail.appendHTML "<b>Adress: </b>" & info(1) & "<br>"
jmail.appendHTML "<b>Postnr: </b>" & info(2) & info(3) & "<br>"
jmail.appendHTML "<b>Postadress: </b>" & info(4) & "<br>"
jmail.appendHTML "<b>Telefonnummer: </b>" & info(5) & "-" & info(6) & "<br>"
jmail.appendHTML "<b>E-post: </b>" & info(7) & "<br>"
jmail.appendHTML "<b>Övrigt: </b>" & info(8) & "<br>"
jmail.appendHTML "<b>Skickat: </b>" & Now() & "<br>"
jmail.appendHTML "</font>"
jmail.Send(mailserver)

For Each nyckel in Request.Cookies(Session.SessionID)
Response.Cookies(Session.SessionID)(nyckel) = ""
Next
sida = Request.ServerVariables("HTTP_REFERER") & "&skickad=ja"
Response.Redirect sida
%>

Nån som vet?

Medlem sedan mars 20016 260 inlägg
#6

varför har du massa dubbelfnuttar? :(
å lägg din kod i kod-tagar..

jmail.AddRecipient eposten

ska räcka.

Medlem sedan apr. 200367 inlägg
#7

nope, samma problem.

kod-tagar?

Medlem sedan apr. 200367 inlägg
#8

Kan det ha att göra med att jag måste registrera JMail på nån vänster? Eller?. Har alldrig använt JMail.

Medlem sedan mars 20016 260 inlägg
#9

när du skriver kod här på webforum ska du använda kod-taggar..
självklart måste du registrera jmail, men om du inte gjort det borde du fått fel på raden där du instansiera det..

Medlem sedan apr. 200367 inlägg
#10

ok. Men vad kan det va för fel da?

Medlem sedan mars 20016 260 inlägg
#11

Gå igenom manualen.. Att registrera komponenten är inte alls svårt och tar max 1 minut.

Medlem sedan apr. 200367 inlägg
#12

Jag har gått igenom manualen. Och jag har inte fått det att fungera. Måste i så fall bero på att jag e MKT trög! Men alltså det står inte hur man ska göra. De skriver det som om man fattar exakt vad de menar och tar saker för givet. som t.ex "du måste registrera JMail.. inan du kan använda det." Dom beskriver inte hur jag ska göra det.

(Inte arg på någon)

Medlem sedan mars 20016 260 inlägg
#13

Saxat ifrån manualen som ligger på Dimac.net:

To use Dimac’s w3 JMail you must have the jmail.dll registered at your web
server. This is done by either running the installation program or by copying
the jmail.dll fi le to your web server and manually registering it with the command
regsvr32 jmail.dll.

Medlem sedan apr. 200367 inlägg
#14

ok. Jag har installerat programet. E det allt?

Medlem sedan apr. 200367 inlägg
#15

Isåfall så e det ju itne det som e problemet.

Medlem sedan mars 20015 287 inlägg
#16

Vad innehåller variabeln eposten?
Var får den sitt värde? Har du gett den variabeln fel namn?

Det kan ju vara en bra ide att använda sig av uteslutningsmetoden när något inte fungerar, mao så lite påbyggt som möjligt och sen ta bit för bit. Tex med en hårdkodad variabel i detta fall.

262 ms totalt · 4 externa anrop · v20260731065814-full.1dc6f849
129 ms — deklarationer (db)
0 ms — hämta statistik (cache)
130 ms — hämta tråd, inlägg och bilagor (db)
128 ms — ändringar (db)