Welcome guest. Before posting on our computer help forum, you must register. Click here it's easy and free.

Author Topic: VBS to EXE  (Read 2808 times)

0 Members and 1 Guest are viewing this topic.

TheHoFL

    Topic Starter


    Intermediate

    Thanked: 5
    VBS to EXE
    « on: November 19, 2009, 02:21:34 PM »
    Hello!

    I have a file that i need to save as an exe so it can not be edited at or and/or so users are not getting our passwords... i have been searching for some time now and cannot find freeware that will let me convert and also append an icon... does anyone know of any free software that will let me perform these tasks?

    Thanks for the assistance!

    HoFL
    All your dreams can come true if you have the courage to pursue them.  - Walt Disney

    Geek-9pm


      Mastermind
    • Geek After Dark
    • Thanked: 1026
      • Gekk9pm bnlog
    • Certifications: List
    • Computer: Specs
    • Experience: Expert
    • OS: Windows 10
    Re: VBS to EXE
    « Reply #1 on: November 19, 2009, 02:36:42 PM »
    From your information iut is hard to understand what you want to do.
    Do you intend to prevent the use of VBS to protect your system?
    Dio you have a script that must be protected?
    Is the script part of a web page?
    Can you program in another language instead of VBS?


    TheHoFL

      Topic Starter


      Intermediate

      Thanked: 5
      Re: VBS to EXE
      « Reply #2 on: November 19, 2009, 03:36:40 PM »
      I want to convert the following script into an ".exe" file. I just cannot seem to find a free app that actually works. One of the takes i need to be able to do is append an icon to the newly created ".exe".

      Code: [Select]
      Dim WshShell
      Set WshShell = CreateObject("WScript.Shell")
      WshShell.run ("runas /env /user:administrator fluidpower.exe")
      WScript.Sleep (100)
      WshShell.AppActivate "C:\windows\system32\runas.exe"
      WScript.Sleep (100)
      WshShell.SendKeys "password"
      WScript.Sleep (100)
      WshShell.Sendkeys "~"
      WScript.Sleep (100)

      Thanks for he help!

      HoFL
      All your dreams can come true if you have the courage to pursue them.  - Walt Disney