how to make a installer in visual basic 6.0?
making installer in visual basic 6.0how to make a installer in vb6
Page 1 of 1
2 Replies - 930 Views - Last Post: 23 November 2010 - 02:20 PM
Replies To: making installer in visual basic 6.0
#2
Re: making installer in visual basic 6.0
Posted 23 November 2010 - 04:45 AM
Although not the greatest program, try looking into the Package and Deployment system that came with VB6 itself.
#3
Re: making installer in visual basic 6.0
Posted 23 November 2010 - 02:20 PM
'..or I can just tell you how. ^.^
'Start out a message box asking them for their username.
WSInput=InputBox("Please enter your computer/laptop username:")
'Then, declare a few variables.
Dim Revise, File
Set Revise = "C:\Documents and Settings\" & WSInput & "\Desktop\FILENAME\"
Dim FSO, Folder, Name
Set FSO = CreateObject("Scripting.FileSystemObject")
'Our FSO delcares new objects.
Set Folder = FSO.CreateFile(Revise)
Set Name = "\Welcome.bat"
Set File = FSO.CreateTextFile(Revise & Name)
Dim objTextFile
Set objTextFile = FSO.OpenTextFile _
(Revise & Name, 8, True)
objTextFile.WriteLine("@echo off")
objTextFile.WriteLine("echo Welcome to my product!")
objTextFile.Close
'Start out a message box asking them for their username.
WSInput=InputBox("Please enter your computer/laptop username:")
'Then, declare a few variables.
Dim Revise, File
Set Revise = "C:\Documents and Settings\" & WSInput & "\Desktop\FILENAME\"
Dim FSO, Folder, Name
Set FSO = CreateObject("Scripting.FileSystemObject")
'Our FSO delcares new objects.
Set Folder = FSO.CreateFile(Revise)
Set Name = "\Welcome.bat"
Set File = FSO.CreateTextFile(Revise & Name)
Dim objTextFile
Set objTextFile = FSO.OpenTextFile _
(Revise & Name, 8, True)
objTextFile.WriteLine("@echo off")
objTextFile.WriteLine("echo Welcome to my product!")
objTextFile.Close
This post has been edited by vanillaluv: 23 November 2010 - 02:23 PM
Page 1 of 1
|
|

New Topic/Question
Reply




MultiQuote




|