nicht angemeldet
Ping ausführen - empfangsbestätigung - meldung in datenbank
Hallo,
vorab: ich programmiere nicht unter visual basic script, sonder nur unter visual basic.
und dies ist mein Problem:
Ich habe eine SQL-Datenbank in der einige rechnernamen stehen.
all diese rechnernamen werden zur zeit in einer messagebox ausgegeben, solange bis der letzte rechner in der tabelle erreicht ist.
nun will ich jeden dieser rechner anpingen lassen, der in der tabelle bzw. in der messagebox ist. wie sage ich aber dem pingbefehl das er die rechnernamen selbstständig aus der datenbank oder der messagebox beziehen soll?
zudem soll anschließend ein report in die datenbank geschrieben werden, ob der pingversuch erfolgreich war oder nicht.
wie kann ich also überprüfen, ob der pingversuch erfolgreich war?
hier noch mal ein bisheriger auszug aus meinem quelltext:
-------------------------------------------------------------------
ssql = "SELECT * FROM [Client ChangeLocalAdmin]"
RCS.Open ssql, CNSQL, adOpenForwardOnly, adLockReadOnly
Do Until RCS.EOF
MsgBox RCS![Computername]
Shell ("c:\winnt\system32\cmd.exe /c ping [?Computername?] ")
^^^^
("an dieser stelle weiß ich nicht weiter")
-------------------------------------
RCS.MoveNext
Loop
--------------------------------------------------------------------
für jeden tipp wäre ich dankbar.
falls ihr noch irgendwelche websiten kennt, die mir mir bzgl. visual basic weiterhelfen könnten, dann schreibt die bitte gleich mit in eure antwort.
danke
flip
-
Meinst Du nicht, das du dir da lieber ein VB Forum suchen solltest?
Ich glaube nicht das sich hier viele VB Programmierer tummeln :)MfG
--
ie:{ fl:( br:^ va:} ls:[ fo:| rl:? n4:# ss:) de:] js:| ch:] mo:| zu:} -