ASP und Emailformular

Hallo,

ich habe es inzwischen geschafft, eine Email per Formular zu verarbeiten.

Dazu muss ich aber eine MAPI.Session mit einem bekannten Benutzer öffnen. Dann werden die Mails aber mit dessen Absender verschickt.
strserver = „SERVER“
strLogonID = „Administrator“
strMailbox = Right(strLogonID, Len(strLogonID) - InStr(strLogonID, „“))
’ Construct CDO profile
strProfileInfo = strServer + vbLF + strMailbox
’ Create CDO session
Set objSession = Server.CreateObject(„MAPI.Session“)
’ Logon with authenticated CDO profile
objSession.Logon „“, „“, False, True, 0, True, strProfileInfo
text = „Text“
set newmsg = objsession.Outbox.messages.add
newmsg.subject = „Subject“
newmsg.text= text
newmsg.update
set objrecip = newmsg.recipients.add
objrecip.name = „[email protected]
objrecip.type = cdoto
objrecip.resolve
newmsg.update
newmsg.send

Wie kann ich Mails mit einem vom Benutzer eingegebenen Absender versenden ?

(IIS 5.0, Windows 2000 Server, Exchange Server 5.5)

Folgendes habe ich bereits probiert:

set xyz = server.createobject(„CDO.Newmail“)
xyz.from = „xyz“
xyz.to = „xyz“

xyz.send

oder:
set xyz = server.createobject.(„CDONTS.message“)
… (wie oben)

Beides geht nicht (Ohne Fehlermeldung, es kommt nur keine Mail an!)

Danke für jede Hilfe, Philip.

Die meisten Mail-Server akzeptieren aus Sicherheitsgründen nur Mails, bei denen entweder der Absender oder aber der Empfänger bekannt sein muss (innerhalb der Domain des Servers). Der Mailserver, den du benutzt, verlangt das wahrscheinlich auch. Es gibt daher keine Möglichkeit, einen selbstgesetzten Absender einzusetzen, es sei denn, du findest einen Server ohne solche Sicherheitsbeschränkungen. Die gibt es, man muss sie nur finden, und das ist nicht einfach, und auch nicht zuverlässig. Die andere, zuverlässigere aber auch teurere Alternative ist selbst einen Mailserver aufzusetzen und zu betreiben.
Gruss
Xavier