eMail anhand Username mit VBS aus AD auslesen funzt nicht (fuer PDF2SMTP)

26/01/2008 - 13:00 von Matthias Fick | Report spam
Hallo,

ich bin auf der Suche nach einem netzwerkfàhigen PDF-Drucker auf
http://www.msexchangefaq.de/tools/pdf2smtp.htm
gestossen.

Das PDF-Drucken funzt auch soweit.

Aber...!
Ein VB-Skript wird aus einer Batch gestartet und soll die
eMail-Adresse anhand des Username aus dem AD auslesen und wieder
zurück in die Batch in eine Variable schreiben.
Aber das VB-Skript liefert einen Fehler.

In der Batch wird checkuser.vbs aufgerufen und der USER übergeben.
checkuser.vbs soll die ermittelte eMail-Adresse in temp2.bat
schreiben. Der Aufruf von temp2.bat übergibt das ganze dann zurück zur
aufrufenden Batch.

Aber folgende Zeile aus checkuser.vbs
WScript.echo "set mailaddress=" & objRecordSet("mail")
produziert einen Fehler.

Hier beide Dateien im Original:
http://www.msexchangefaq.de/tools/p...ckuser.zip

Um folgenden Code geht es:

=Batch-Anfangrem Code vorher
rem ...
set USER=mueller
(cscript checkuser.vbs %USER% //nologo) >>%temp%\temp2.bat
call %temp%\temp2.bat
rem ...
rem Code nachher
=Batch-Ende

=checkuser.vbs-Anfangset Args = wscript.arguments
argument1=args(0)
CheckForUser(argument1)
function CheckForUser(samAccountName)
strUserName = samAccountName

Set objConnection = CreateObject("ADODB.Connection")
objConnection.Open "Provider­sDSOObject;"

Set objCommand = CreateObject("ADODB.Command")
objCommand.ActiveConnection = objConnection
objCommand.CommandText = _
"<LDAP://dc=firma,dc=com>;(&(objectCategory=User)" & _
"(samAccountName=" & strUserName & "));mail;subtree"

Set objRecordSet = objCommand.Execute

WScript.echo "set mailaddress=" & objRecordSet("mail")

objConnection.Close

End function
=checkuser.vbs-Ende

Ich habe mich auch auf www.faq-o-matic.net umgeschaut, bin aber bei
den vielen Scripten nicht recht schlau geworden, welches man am besten
nimmt, um es umzubauen.

Vielleicht kann Nils was dazu schreiben.

Danke.


Gruss aus Franken
Matthias

Antworten bitte in die NG.
eMails bitte an
matthias<DOT>fick<AT>web<DOT>de
 

Lesen sie die antworten

#1 Nils Kaczenski [MVP]
26/01/2008 - 18:05 | Warnen spam
Moin,

Matthias Fick schrieb:
Aber folgende Zeile aus checkuser.vbs
WScript.echo "set mailaddress=" & objRecordSet("mail")
produziert einen Fehler.



aha. Und welcher das ist, sagt uns unsere Kristallkugel?

Vielleicht kann Nils was dazu schreiben.



Ja, gern. Aber du musst schon sagen, was denn konkret fehlschlàgt.

(Im Übrigen ist die Lösung, die du da anführts, gar nicht von mir. Von
mir ist die andere, die Frank verlinkt. Das ist aber eine alte
Rohversion. Der aktuelle Entwicklungsstand ist allerdings nicht frei
verfügbar.)


Schöne Grüße, Nils

Nils Kaczenski - MVP Windows Server
www.faq-o-matic.net
Antworten bitte nur in die Newsgroup!
PM: Vorname at Nachname .de
https://mvp.support.microsoft.com/p....Kaczenski

Ähnliche fragen