• 0

How to import .VBS code to VB Express?


Question

So i have a lot of .VBS files i created and wanted to imoprt them to VB Express which is free from MS and i have installed.

I believe i can compile them to .exe if i do this?

Question is, am i right? If so, how do i do it, beacuse i cant see an easy way?

Sorry for such n00b questions, but im VERY new at this.

Cheers,

Rich

Link to comment
https://www.neowin.net/forum/topic/565895-how-to-import-vbs-code-to-vb-express/
Share on other sites

18 answers to this question

Recommended Posts

  • 0

A script is simply executing commands. Your program IS the command, in a sense. Now, you can have your program "script" things, but fundamentally it's doing the same thing as your script.

Let me ask you this. Why do you want to compile your scripts into a EXE?

  • 0
  Endo. said:
You can not simply convert a .vbs script into an executable, but you could transform the code so that it was compatible with whichever outcome you wanted. Its hard to explain, but possible, if you think outside the box.

Its not that i want to compile it to a .exe as such.

  John said:
A script is simply executing commands. Your program IS the command, in a sense. Now, you can have your program "script" things, but fundamentally it's doing the same thing as your script.

Let me ask you this. Why do you want to compile your scripts into a EXE?

Basically i think programming is something i should start looking at as i find it fasinating. A few web sites have said that script language is very similar to VB.

However, what i really want to do is create a VB program which does all the same things as some scripts i have created.

I have created a script that asks you to enter a location of a file, such as Word.exe and once you have entered it, it will run with the admin username and password, however all i can do to hide the admin password is encrypt the file, which is easy to decrypt, so in the wrong hands the file could be dangerous to our system.

So if i could create a program which does the same function, then surely that admin password would be safer?

  • 0
  Endo. said:
So you want to make simplistic login system? Question... is the username and password data subject to change?

Not to log in, just to run a file with the admin account instead of the account you have logged in with.

So rather than right clicking the file and selecting run as and then entering the user name and password, they will run this file instead, enter the file location and then it will run that file automatically with the admin user name and password.

The password and username are not subject to change any time in the forseeable future.

Perhaps i need to know if there is anywhere which can teach me basic VB language skills?

  • 0

Please be clear on this. VBScript is the scripting derivative of Visual Basic 6.

In VB Express you code VisualBasic.net - a completely new language.

VBS and VB6, although vastly different, share a syntax to an extent. VB.net is totally new.

As such, you need to map out what your VBS does logically (not code but more a flowchart) and then learn VB.net to completely re-code it.

  • 0
  njlouch said:
Please be clear on this. VBScript is the scripting derivative of Visual Basic 6.

In VB Express you code VisualBasic.net - a completely new language.

VBS and VB6, although vastly different, share a syntax to an extent. VB.net is totally new.

As such, you need to map out what your VBS does logically (not code but more a flowchart) and then learn VB.net to completely re-code it.

Thanks Nik. I think my head is about to explode now! :laugh:

In that case i guess what im asking is not technically possible.

Is there some resources you guys know of that will help me learn even basic VB.net?

  • 0

Hi Rich,

It should definitely be technically possible to do what you want, yes.

I'm not a VB.net programmer, however I do code in VB6 and VBA on a daily basis and there are certain things that are similar.

Take a look over here---->http://www.programmersheaven.com/2/VB-NET-School

Ad

  • 0
  Adaytay said:
Hi Rich,

It should definitely be technically possible to do what you want, yes.

I'm not a VB.net programmer, however I do code in VB6 and VBA on a daily basis and there are certain things that are similar.

Take a look over here---->http://www.programmersheaven.com/2/VB-NET-School

Ad

Cheers mate. will take a look at home some point.

Any other suggestions from anyone else?

Cheers,

Rich

  • 0

Rich

Let me give some advice that was given to me, and I found worked FOR ME. Ditch Visual Basic - you are learning a new language so take the opportunity to use C# instead (some people prefer it).

Post your VBS (rename to something else) and also a breakdown of what it does.

Cheers

  • 0
  njlouch said:
Rich

Let me give some advice that was given to me, and I found worked FOR ME. Ditch Visual Basic - you are learning a new language so take the opportunity to use C# instead (some people prefer it).

Post your VBS (rename to something else) and also a breakdown of what it does.

Cheers

Ok, here is the vbs script, without the real username and password for our desktop admin:

Hint=MsgBox("To use this program you need to input the program location in the next screen and NOT THE SHORTCUT LOCATION! If you are unsure of the software location, then right click the programs shortcut and select properties, then copy the target information and paste it in the next screen. Make sure you remove any quotation marks otherwise this program will not work!", vbOkOnly+vbInformation, "Runas")

Location=Inputbox("Please type the location of the file you wish to run below, then press OK.", "Runas")

If IsEmpty(Location) Then

Wscript.Quit

End If

Confirm=MsgBox("You entered the following location:" & vbCrLf & vbCrLf & Location & vbCrLf & vbCrLf & "Click ok to run the file, or cancel to re-type the location.", vbOkCancel+vbInformation, "Runas")

If Confirm=vbOk Then

Dim oShell

set oShell= Wscript.CreateObject("WScript.Shell")

oShell.Run "runas /noprofile /user:administrator " & chr(34) & Location & chr(34)

WScript.Sleep 100

oShell.Sendkeys "password here~"

Wscript.Quit

Else Confirm=vbCancel

Location2=Inputbox("Please type the new location of the file you wish to run below, then press OK.", "Runas")

If IsEmpty(Location2) Then

Wscript.Quit

End If

Confirm2=MsgBox("You entered the following location:" & vbCrLf & vbCrLf & Location2 & vbCrLf & vbCrLf & "Click ok to run the file, or cancel to Exit the program.", vbOkCancel+vbInformation, "Runas")

If Confirm2=vbOK Then

set oShell= Wscript.CreateObject("WScript.Shell")

oShell.Run "runas /noprofile /user:administrator " & chr(34) & Location2 & chr(34)

WScript.Sleep 100

oShell.Sendkeys "password here~"

Wscript.Quit

Else Confirm2=vbCancel

Wscript.Quit

End If

End If

  • 0
  njlouch said:
Let me give some advice that was given to me, and I found worked FOR ME. Ditch Visual Basic - you are learning a new language so take the opportunity to use C# instead (some people prefer it).

Indeed, C# will give you a grounding in fundamental programming logic and also make you familiar with Object Oriented programming styles - so you can progress to C++, Java, PHP, or other such languages easier... (if you should so wish).

  • 0

This might save you some time

C#

http://www.codeproject.com/csharp/RunAs.asp

VB.NET

http://www.tek-tips.com/viewthread.cfm?qid=1235871

Edited by primortal
  • 0
  Endo. said:
Indeed, C# will give you a grounding in fundamental programming logic and also make you familiar with Object Oriented programming styles - so you can progress to C++, Java, PHP, or other such languages easier... (if you should so wish).

uh so does VB.NET, VB.NET is just a syntax change from C# its the same language besides syntax changes... uses the same objects and classes, same OOP approach, if you can code in VB.NET learning C# is easy, and vice versa... so saying ditch one is meaningless, if you know one you can pick up the other VERY quickly since they use all the same namespaces (if you leave out, and which you should, the legacy microsoft.visualbasic namespace, of which you can still use in C# if you want to)

This topic is now closed to further replies.
  • Recently Browsing   0 members

    • No registered users viewing this page.
  • Posts

    • LibreOffice narrows gap with Microsoft Office in 25.8 Beta 1 by David Uzondu The Document Foundation has released LibreOffice 25.8 Beta 1 for public testing on Linux, macOS, and Windows. This is the second pre-release for the 25.8 cycle and the foundation says that the final, stable version of LibreOffice 25.8 is expected to land at the end of August 2025. Starting off with Writer, LibreOffice's Word, the developers have finally addressed some long-standing annoyances, including a new command to easily insert a paragraph break right before a table. This beta also introduces a useful privacy feature in its Auto-Redact tool, letting you strip all images from a document with a single option. To use it, go to Tools and select the Auto-Redact option: The application has improved its ability to handle different languages for punctuation, preventing mix-ups in multilingual documents. Other notable improvements have also been made. A new hyphenation rule lets you choose to prevent a word from splitting at the end of a page, moving the whole line to the next page instead. Microsoft Word has had this feature for years now. The Navigator now displays a handy tooltip with word and character counts for headings and their sub-outlines. Scrolling behavior when selecting text has been improved, making it less erratic. A new command with a keyboard shortcut was added for converting fields into plain text. Calc gets a lot of new functions that bring it closer to its competitors like Excel, including TEXTSPLIT, VSTACK, and WRAPROWS. Impress now properly supports embedded fonts in PPTX files, which should reduce headaches when sharing presentations with PowerPoint users. Alongside these additions, the project is also cleaning house; support for Windows 7, 8, and 8.1 has been completely dropped. There are also smaller UI tweaks across the suite, like allowing a single click to enter rotation mode for objects in Writer and Calc. macOS users get better integration, with proper support for native full screen mode and new window management features from the Sequoia update. In terms of performance, the team has optimized everything from loading huge DOC files and XLSX spreadsheets with tons of conditional formatting to simply switching between sheets in Calc. These improvements should be noticeable, especially when working with complex documents. A new application-wide "Viewer mode" has also been implemented, which opens all files in a read-only state for quick, safe viewing. On a related note, The Document Foundation has joined efforts by the likes of KDE to encourage Windows 10 users to switch to Linux. Also, you might have heard that Denmark, in a bid to lessen its reliance on Microsoft, has decided to make a full switch to LibreOffice, with plans to begin phasing out Office 365 in certain ministries as early as next month. If you're interested in this release, you can read the full release notes and download the binaries for your platform: Windows, macOS (Intel | Apple Silicon), or Linux (DEB | RPM). You can also get the latest stable version from our software stories page.
    • Until it can be used 100% offline (ie: PST file support or equiv) not even considering it. I'll jump to Thunderbird first which has gotten a LOT better since the last time I looked at it.
  • Recent Achievements

    • Explorer
      Case_f went up a rank
      Explorer
    • Conversation Starter
      Jamie Smith earned a badge
      Conversation Starter
    • First Post
      NeoToad777 earned a badge
      First Post
    • Week One Done
      JoeV earned a badge
      Week One Done
    • One Month Later
      VAT Services in UAE earned a badge
      One Month Later
  • Popular Contributors

    1. 1
      +primortal
      545
    2. 2
      ATLien_0
      227
    3. 3
      +FloatingFatMan
      159
    4. 4
      Michael Scrip
      113
    5. 5
      +Edouard
      105
  • Tell a friend

    Love Neowin? Tell a friend!