Hallo,
erstmal Vorweg, das ist mein erster Versuch ein VBS zu bauen. Komme eigentlich nicht aus dem Sektor. Das ist jetzt mit viel googel entstanden.
Ich schilder erstmal mein Vorhaben.
Auf unseren Firmen PC läuft einen Microsoft SQL Datenbank für unsere Betriebssoftware. Diese Software arbeitet mit mehreren Clienten im Netzwerk. Mein Chef möchte aber von Zuhause darauf zugreifen. Also habe ich auf dem Firmewebeserver ein kleines Script in php erstellt das beim aufrufen unter anderem die ip in ein textfile schreibt. Im Betriebssystem habe ich dass dann mit einer .bat und Windows Aufgabenplanung so eingebaut, dass nach Feierabend die IP Adresse sich 2x aktuallisiert.
Soweit ist alles OK. Das geht auch Problemlos.
So, auf dem PC vom Chef Zuhause habe ich ein vbs gebaut, dass das erstellte Textfile vom Server holt und automatisch in die windows registry lädt. Das geht auch super. Nur ein Problem habe ich da noch.... Erstmal das vbs
In der letzten Zeile wird die Datei aufgerufen und in die Windows Registrirung geschrieben.
So, nun muss man das aber zwingend als Admin ausführen. Das vbs kann man leider nicht mit Rechtsklick "Als administrator ausführen" starten. Das Feld existiert nicht. Wie bekomme ich das jetzt so hin, dass das Windows mich nach dem Password fragt? So wie es bei dem rechtsklick ausführen als Admin, dass das PopUp aufgeht?
Ich würde mcih über Hilfreiche Tipps sehr freuen.
erstmal Vorweg, das ist mein erster Versuch ein VBS zu bauen. Komme eigentlich nicht aus dem Sektor. Das ist jetzt mit viel googel entstanden.
Ich schilder erstmal mein Vorhaben.
Auf unseren Firmen PC läuft einen Microsoft SQL Datenbank für unsere Betriebssoftware. Diese Software arbeitet mit mehreren Clienten im Netzwerk. Mein Chef möchte aber von Zuhause darauf zugreifen. Also habe ich auf dem Firmewebeserver ein kleines Script in php erstellt das beim aufrufen unter anderem die ip in ein textfile schreibt. Im Betriebssystem habe ich dass dann mit einer .bat und Windows Aufgabenplanung so eingebaut, dass nach Feierabend die IP Adresse sich 2x aktuallisiert.
Soweit ist alles OK. Das geht auch Problemlos.
So, auf dem PC vom Chef Zuhause habe ich ein vbs gebaut, dass das erstellte Textfile vom Server holt und automatisch in die windows registry lädt. Das geht auch super. Nur ein Problem habe ich da noch.... Erstmal das vbs
Visual Basic-Quellcode
- Set fso = CreateObject("Scripting.FileSystemObject")
- fso.GetFile("C:\wawi\datei.reg").Delete
- 'Set your settings
- strFileURL = "http://www.domain.de/ip/datei.reg"
- strHDLocation = "C:\sync\datei.reg"
- ' Fetch the file
- Set objXMLHTTP = CreateObject("MSXML2.XMLHTTP")
- objXMLHTTP.open "GET", strFileURL, false
- objXMLHTTP.send()
- If objXMLHTTP.Status = 200 Then
- Set objADOStream = CreateObject("ADODB.Stream")
- objADOStream.Open
- objADOStream.Type = 1 'adTypeBinary
- objADOStream.Write objXMLHTTP.ResponseBody
- objADOStream.Position = 0 'Set the stream position to the start
- Set objFSO = Createobject("Scripting.FileSystemObject")
- If objFSO.Fileexists(strHDLocation) Then objFSO.DeleteFile strHDLocation
- Set objFSO = Nothing
- objADOStream.SaveToFile strHDLocation
- objADOStream.Close
- Set objADOStream = Nothing
- End if
- Set objXMLHTTP = Nothing
- CreateObject("WScript.Shell").Run "C:\sync\datei.reg"
In der letzten Zeile wird die Datei aufgerufen und in die Windows Registrirung geschrieben.
So, nun muss man das aber zwingend als Admin ausführen. Das vbs kann man leider nicht mit Rechtsklick "Als administrator ausführen" starten. Das Feld existiert nicht. Wie bekomme ich das jetzt so hin, dass das Windows mich nach dem Password fragt? So wie es bei dem rechtsklick ausführen als Admin, dass das PopUp aufgeht?
Ich würde mcih über Hilfreiche Tipps sehr freuen.
