Jump to content

MikroMan

Members
  • Posts

    10
  • Joined

  • Last visited

About MikroMan

  • Birthday 03/20/1972

Profile Information

  • Location
    Tarboro, NC

MikroMan's Achievements

Seeker

Seeker (1/7)

0

Reputation

  1. SWEET! Thanks
  2. You ROCK! Super Thanks!!!!
  3. I need a new brain. I can't seen to figure out how to repeat my script until I press "No" to a messagebox question. ***** SCRIPT BEGINS ***** $host = InputBox("Hostname","Enter the destination hostname...") $ping = Ping($host,250) If $ping Then; also possible: If @error = 0 Then ... Msgbox(0,"Status", $host & " is online, roundtrip was:" & $ping, 2) Else Msgbox(0,"Status","An error occured with number: " & @error) Exit EndIf FileCopy("S:\EUSEASTNC\TEAM JAY\GNVL NOC\DynaText_4_1\5ess_oam.ini","\\" & $host & "\c$\Program Files\ltbooks\bin\",1) Beep(500,200) FileCopy("S:\EUSEASTNC\TEAM JAY\GNVL NOC\DynaText_4_1\5ESS Switch Documentation.lnk","\\" & $host & "\c$\Documents and settings\All users\Desktop\",1) Beep(500,200) MsgBox(262180,"Complete","Do you want to copy files to another host?",30) ***** SCRIPT ENDS ***** Can any one help? I would be greatful....
  4. See if this helps. RunWait(@COMSPEC & " /c Start d:\myfile.msi")
  5. I'm stuck! I am trying to caculate the CPU speed and divide that in half. Finaly.., after I get that number then I have to change the final number into a percent of the original speed. Last thing is to SEND($CPUSPEED) in my script. Has anyone done this before? Any help would be great! Thanks, Russ
  6. Thanks for all the ideas. I am still unable to get it working. See code: Answer() Func Answer() Global $answer = InputBox('HostName Change', 'Enter the Hostname that you want this PC to be changed to.', '', '', -1, -1, -1, -1, 30) If NOT StringIsDigit($answer) AND NOT StringIsAlpha($answer) AND StringIsAlNum($answer) Then Stop() Else Verify() EndIf EndFunc Func Stop() MsgBox(262160, 'STOP', 'You must enter a valid hostname to continue.' & @CRLF & 'Please restart the utility and try again.', 120) Exit EndFunc Func Verify() If MsgBox(262212, 'Verify', 'You entered: ' & $answer & @CRLF & 'Is this the hostname that you wanted to enter?', 60) = 7 Then Answer() Else MsgBox(0, 'Yeehaw!', 'You HAVE enter a valid hostname.') EndIf EndFunc This is just test code, but when I just click "OK" it accepts a "Blank or Null" value. I need Alpha Numeric with no "white space" and no "Null" value. Keep the ideas coming. I have run out... Cheers, Russ
  7. Thanks Red. You basicly answered my question. My thought was that..., if you use StringIsAlpha(), then the string has to be alpha. If you use StringIsDigit()..., it has to numeric. I was looking for something that had to have alpha and numeric and not just one or the other. Do you know of a way I could force AlphaNumeric input and not just one or the other? Thanks, Russ
  8. :postal: Here is the sitch. When I use sniplet below and enter "12345" in the InputBox.., I get a return of one. When I enter "adbce"..., I returns 1. I maybe wrong but, is it supposed to return a zero(0) if it is not alpha and numeric. ************BEGIN SNIPLET*********************** Func Answer() Global $answer = InputBox("HostName Change", "Enter the Hostname that you want this PC to be changed to.", "", "", -1, -1, -1, -1, 30) If StringIsAlNum($answer) < 1 Then Stop() Else Verify() Blockinput(1) EndIf EndFunc ************END SNIPLET************************** Can someone verify this for me? Thanks, Russ
×
×
  • Create New...