Batch file.

[D-Devil]

Ik heb vroeger wel met MS-DOS gewerkt,
heel veel zelfs, en ook met Batch files schrijven.

Wat ik dus uiteraard vergeten ben na al geruime tijd aan Windows te zitten. Ik wil het volgende voor Windows2000, een kleine batchfile waarmee ik een net send message kan sturen.

Deze file vraagt mij dus om de input (text) en vervolgens maakt hij ene output die gevolgd wordt door een ENTER, waardoor de message aankomt.

In principe gewoon een menu met als optie
1: Verzend een bericht
2: Sluit batchfile.

Als ik 1 kies vraagt deze een input en verstuurt deze naar de gebruiker die altijd hetzelfde is, dus:

Net send d-devil "text"

Waarin het schuingedrukte dus mijn input is... na een net send gewoon weer naar het begin van de file toe, met optie 1 en optie 2.

Iemand een idee ?

[thomaske]

laatmaar.. * thomaske kan niet lezen..

[3steps667]

code:

<?xml version="1.0"?>
<package>
<job id="NetSend">
<script language="vbscript">
<![CDATA[
  Dim user, msg
  user = "Vul de naam van de user hier in"
  msg = InputBox("Type your message...", "Message", "")
  Dim wsh
  Set wsh = WScript.CreateObject("WScript.Shell")
  wsh.run "net send "&user&" "&msg, 7, False
  Set wsh = Nothing

]]>
</script>
</job>
</package>

opslaan als wsf.

je moet hem wel telkens opnieuw starten als je een nieuwe message wilt sturen. misschien kan iemand even een loopje erbij toevoegen.

[D-Devil]

Op donderdag 18 april 2002 11:26 schreef 3steps het volgende:

code:

<?xml version="1.0"?>
<package>
<job id="NetSend">
<script language="vbscript">
<![CDATA[
  Dim user, msg
  user = "Vul de naam van de user hier in"
  msg = InputBox("Type your message...", "Message", "")
  Dim wsh
  Set wsh = WScript.CreateObject("WScript.Shell")
  wsh.run "net send "&user&" "&msg, 7, False
  Set wsh = Nothing

]]>
</script>
</job>
</package>

opslaan als wsf.

je moet hem wel telkens opnieuw starten als je een nieuwe message wilt sturen. misschien kan iemand even een loopje erbij toevoegen.

wsf = voor mij wtf ?

ik heb het al.

[3steps667]

bestandsnaam.wsf

heb je ook al een loopje ervoor?

[D-Devil]

Op donderdag 18 april 2002 11:47 schreef 3steps het volgende:
bestandsnaam.wsf

heb je ook al een loopje ervoor?

Nee die heb ik niet...
Mocht je het weten graag, anders is dit in ieder geval al een vooruitgang, ik heb de file al 5 keer op mijn desktop staan voor meerdere users.

[3steps667]

die user kan je ook variabel maken hoor, dat je eerst een schermpje krijgt waar je de username inrammelt en daarna een scherm voor de message.

code:

user = InputBox("Send to", "Netbios Name", "")

[D-Devil]

Is dat zo ? ik ga eens even klooien ermee als het niet lukt hoor je het wel.

[D-Devil]

code:

<?xml version="1.0"?>
<package>
<job id="NetSend">
<script language="vbscript">
<![CDATA[
  Dim user, msg
  user = InputBox("Type the user...", "Users", "")
  msg = InputBox("Type your message...", "Message", "")
  Dim wsh
  Set wsh = WScript.CreateObject("WScript.Shell")
  wsh.run "net send "&user&" "&msg, 7, False
  Set wsh = Nothing
]]>
</script>
</job>
</package>

[SchizoDuckie]

[batch]

net send username "%1"

[/batch]

[Verwijderd]

Ik heb er een in Java geschreven. Ik heb hem nu niet in bereik, maar zal er wel eens een aantal screenshots van nemen .