VB Script funktioniert nicht ganz

Betreff	VB Script funktioniert nicht ganz
Von	=?Utf-8?B?Z2FicmllbA==?=
Datum	23.10.2009 11:10:01

Hallo Leute

Kann mir jemand sagen was ich falsch machen. Ich möchte, dass nach der "If
Is Member" Abfrage, die Abfrage Computernamen mit entsprechendem Drucker
gemacht wird. Die IF Is Member abfrage oder die Computer und Drucker Abfrage
funktionieren jeweils einzel wunderbar. Aber sie sollen eben zusammen
funtionieren. Wäre echt dankbar wenn mir jemand sagen kann wie ich die zwei
IF Abfragen verbinden muss.

Danke und Gruss Gabriel

--------------------------------------------------------------------------------
If IsMember("Abt Ahorn B") Then
net.MapNetworkDrive "G:", strFileSRV03 & "WG AhornB"
WSHNetwork.AddWindowsPrinterConnection strPrintSRV03 & "PR095"
WSHNetwork.SetDefaultPrinter strPrintSRV03 & "PR095"
neuerlink = strPCProfilePath & "\" & WSHNetwork.UserName & "\Desktop\" &
"\WG Ahorn B.lnk"
Set link = WSHShell.Createshortcut(neuerlink)
link.TargetPath = strFileSRV03 & "WG AhornB"
link.Save
neuerlink = strPCProfilePath & "\" & WSHNetwork.UserName & "\Desktop\" &
"\Boardmaker.lnk"
Set link = WSHShell.Createshortcut(neuerlink)
link.TargetPath = strPCProgrammPath & "\Boardmaker with SD Pro\BM_SDP.exe"
link.Save

If WSHNetwork.ComputerName = "PC307" Then
WSHNetwork.AddWindowsPrinterConnection strPrintSRV03 & "PR026"
WSHNetwork.SetDefaultPrinter strPrintSRV03 & "PR026"
ElseIf WSHNetwork.ComputerName = "PC306" Then
WSHNetwork.AddWindowsPrinterConnection strPrintSRV03 & "PR090"
WSHNetwork.SetDefaultPrinter strPrintSRV03 & "PR090"
End If

Betreff	Re: VB Script funktioniert nicht ganz
Von	"Thorsten Albers"
Datum	23.10.2009 13:24:31

gabriel schrieb im Beitrag
<2A1D2169-BF0E-407F-9343-B8874873CBB8@microsoft.com>...
> Wäre echt dankbar wenn mir jemand sagen kann wie ich die zwei
> IF Abfragen verbinden muss.

Indem man sich einfach 'mal ein bischen mit der Programmiersprache
auseinandersetzt, die man verwendet...

- If...End If-Anweisungen können verschachtelt werden
- Durch die Operatoren 'And' und 'Or' können in einer Abfrage mehrere
Bedingungen abgefragt werden, wobei zu beachten ist, daß >in jedem Fall<
>jede< Bedingung geprüft wird.
- Ist das Gewünschte durch eine Verschachtelung und/oder
Abfrage-Kombination nicht erreichbar, verwendet man Variablen, die
entsprechend schon durchgeführten Abfragen gesetzt und in einer
nachfolgenden Abfrage verwendet werden können

--
Thorsten Albers

albers (a) uni-freiburg.de

Betreff	Re: VB Script funktioniert nicht ganz
Von	=?Utf-8?B?Z2FicmllbA==?=
Datum	23.10.2009 15:04:01

Lieber Thorsten
Ich setzte mich sehr wohl mit der Programmiersprache auseinander, dafür
brauche ich keine Belehrung! Mein Script ist nicht einfach sonst über 1200
Zeilen lang. Da war lediglich ein kleiner Fehler der mir unterlaufen ist und
den ich einfach nicht gesehen habe. Inzwischen habe ich ihn gefunden.

Es ist ja gestattet hier mal nachzufragen, wenn man mal vor lauter Wald die
Bäume nicht mehr sieht!


"Thorsten Albers" wrote:

> gabriel schrieb im Beitrag
> <2A1D2169-BF0E-407F-9343-B8874873CBB8@microsoft.com>...
> > Wäre echt dankbar wenn mir jemand sagen kann wie ich die zwei
> > IF Abfragen verbinden muss.
>
> Indem man sich einfach 'mal ein bischen mit der Programmiersprache
> auseinandersetzt, die man verwendet...
>
> - If...End If-Anweisungen können verschachtelt werden
> - Durch die Operatoren 'And' und 'Or' können in einer Abfrage mehrere
> Bedingungen abgefragt werden, wobei zu beachten ist, daß >in jedem Fall<
> >jede< Bedingung geprüft wird.
> - Ist das Gewünschte durch eine Verschachtelung und/oder
> Abfrage-Kombination nicht erreichbar, verwendet man Variablen, die
> entsprechend schon durchgeführten Abfragen gesetzt und in einer
> nachfolgenden Abfrage verwendet werden können
>
> --
> Thorsten Albers
>
> albers (a) uni-freiburg.de
>
> .
>

Betreff	Re: VB Script funktioniert nicht ganz
Von	"Thorsten Albers"
Datum	23.10.2009 16:43:46

gabriel schrieb im Beitrag
<2FF25390-C2AD-4C4C-9A7A-6AE904EA1C49@microsoft.com>...
> Ich setzte mich sehr wohl mit der Programmiersprache auseinander, dafür
> brauche ich keine Belehrung! Mein Script ist nicht einfach sonst über
1200
> Zeilen lang. Da war lediglich ein kleiner Fehler der mir unterlaufen ist
und
> den ich einfach nicht gesehen habe. Inzwischen habe ich ihn gefunden.
>
> Es ist ja gestattet hier mal nachzufragen, wenn man mal vor lauter Wald
die
> Bäume nicht mehr sieht!

Natürlich ist es gestattet - andernfalls hätte ich es bei dem ersten Satz
belassen. Und wenn Dir die zusätzlichen Hinweise nicht neu waren, dann hast
Du Deine Frage entschieden falsch gestellt.

Übrigens, so nebenbei: Diese Newsgroup beschäftigt sich mit der
Programmiersprache Visual Basic (VB). Da die Skriptsprache Visual Basic
Script (VBS) sich in einigen wesentlichen Punkten von VB unterscheidet,
wurde dafür eine eigene Newsgroup eingerichtet...

--
Thorsten Albers

albers (a) uni-freiburg.de