Gewusst wie: arbeiten mit Benutzer-text-Eintrag in eine HTA-form

Habe ich die a-Taste auf meiner hta-Datei, dass wenn ich auf auslösen wird eine batch-Datei ausgeführt werden. Ich möchte der Benutzer zum eingeben des computer-namens in einem Textfeld, und verwenden Sie es an die unten psexec-Befehl erfordert den Namen des Computers. Irgendwelche Empfehlungen würde sehr geschätzt.

<script language="VBScript">
Sub InstallVNC
    dim shell
    set shell=createobject("wscript.shell")
    shell.run "psexec -u domain01\username -p password \\textbox1.value -c \\doamin\SHARE\SOFTWARE\install_program.bat"
End Sub


<body bgcolor="buttonface">
<p><font face="verdana" color="red">Application Installer</font></p>
Please run as administrator. <p>
<form name="test">
<font>Computer Name:</font>
<input type="text" name="textbox1" id="textbox1">
</form>
<input id=runbutton  class="button" type="button" value="Install VNC" name="db_button"  onClick="installvnc"><p>

</body>
</html>

InformationsquelleAutor user2651624 | 2013-08-05

  1. 1

    Müssen Sie behandeln die input-string anders. So etwas wie dieses:

    Sub InstallVNC
  dim shell
  dim strInput
  dim shell_parameter
  strInput = textbox1.value
  shell_parameter = "psexec -u domain01\username -p password \\" & strInput  & " -c   \\doamin\SHARE\SOFTWARE\install_program.bat"
  set shell=createobject("wscript.shell")
  shell.run shell_parameter
End Sub

    Darum, die Benutzereingabe: ich habe nicht verwendet <form> im hta -- ein dialog ist immer einfacher gewesen. Ich Frage mich, wenn, dass würde Sie Vergangenheit das problem. Dieser code wird aufgerufen, wenn die Taste gedrückt wird:

    Dim strDialogPrompt, strDialogTitle, strDialogDefault

strDialogTitle = "File location"

strDialogPrompt = "Enter location of file to install." _
    & vbCrLf & "(You must run this as Administrator.)"

strDialogDefault = "Z:\The_Usual_Path"

strInput = InputBox(strDialogPrompt, strDialogTitle, strDialogDefault, 150, 150)
    Immer noch gibt mir eine Fehlermeldung. Sagt Objekt erforderlich 'textbox1', code 0
    Ich denke, es ist faul, aber ich bin hinzufügen einen Vorschlag zu meiner Antwort: überspringen Sie die <form> und <input> tags, gehen Sie einfach mit einem Dialogfeld.
    Code funktioniert für mich. Hat Ihr input-Feld tatsächlich haben die ID "textbox1"?
    Sorry. Es funktionierte tatsächlich. Recht hat er. Ich nahm das <form> und es funktionierte. Danke.

    InformationsquelleAutor Smandoli

  2. 0

    Grundlegenden DOM-manipulation:

    Dim computerName
computerName = document.getElementById("textbox1").value

    Weitere Informationen finden Sie unter so ziemlich jedem DOM-Referenz (z.B., https://developer.mozilla.org/en-US/docs/DOM)

    In HTAs Sie können Elemente nur mit Ihrer ID, so textbox1.value sollte aber funktionieren, wenn das element tatsächlich die ID "textbox1".
    Stimmen. Es prolly nicht viele Leute, die verwenden beide HTA und die document Objekt.

    InformationsquelleAutor Cheran Shunmugavel

Schreibe einen Kommentar