Hallo, laut diesem Script müsste das ganze Maximal eine Sekunde dauern... Leider dauert das erheblich länger, woran liegt das?
Spoiler anzeigen
ProgressOn("IP ermitteln","Die IP's für die Computer werden ermittelt")
TCPStartup()
ProgressSet(5,"Rechner 1 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-01",50) Then $pcip1 = TCPNameToIP("wks-if3-01")
ProgressSet(10,"Rechner 2 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-02",50) Then $pcip2 = TCPNameToIP("wks-if3-02")
ProgressSet(15,"Rechner 3 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-03",50) Then $pcip3 = TCPNameToIP("wks-if3-03")
ProgressSet(20,"Rechner 4 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-04",50) Then $pcip4 = TCPNameToIP("wks-if3-04")
ProgressSet(25,"Rechner 5 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-05",50) Then $pcip5 = TCPNameToIP("wks-if3-05")
ProgressSet(30,"Rechner 6 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-06",50) Then $pcip6 = TCPNameToIP("wks-if3-06")
ProgressSet(35,"Rechner 7 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-07",50) Then $pcip7 = TCPNameToIP("wks-if3-07")
ProgressSet(40,"Rechner 8 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-08",50) Then $pcip8 = TCPNameToIP("wks-if3-08")
ProgressSet(45,"Rechner 9 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-09",50) Then $pcip9 = TCPNameToIP("wks-if3-09")
ProgressSet(50,"Rechner 10 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-10",50) Then $pcip10 = TCPNameToIP("wks-if3-10")
ProgressSet(55,"Rechner 11 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-11",50) Then $pcip11 = TCPNameToIP("wks-if3-11")
ProgressSet(60,"Rechner 12 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-12",50) Then $pcip12 = TCPNameToIP("wks-if3-12")
ProgressSet(65,"Rechner 13 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-13",50) Then $pcip13 = TCPNameToIP("wks-if3-13")
ProgressSet(70,"Rechner 14 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-14",50) Then $pcip14 = TCPNameToIP("wks-if3-14")
ProgressSet(75,"Rechner 15 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-15",50) Then $pcip15 = TCPNameToIP("wks-if3-15")
ProgressSet(80,"Rechner 16 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-16",50) Then $pcip16 = TCPNameToIP("wks-if3-16")
ProgressSet(85,"Rechner 17 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-17",50) Then $pcip17 = TCPNameToIP("wks-if3-17")
ProgressSet(90,"Rechner 18 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-18",50) Then $pcip18 = TCPNameToIP("wks-if3-18")
ProgressSet(95,"Rechner 19 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-19",50) Then $pcip19 = TCPNameToIP("wks-if3-19")
ProgressSet(100,"Rechner 20 / 20","Die IP's für die Computer werden ermittelt")
If Ping("wks-if3-20",50) Then $pcip20 = TCPNameToIP("wks-if3-20")
TCPShutdown()
ProgressOff()
Ich glaube AutoIT mag mich nicht mehr...