VB6.0反安装软件的制作? installer viseinstallshield都可以啊 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 有没有更好的源程序解决这个问题我看到过VB5.0的反安装程序,但它提示VB6.0有不同,是这样的吗?setupbuider我有,可不太会用至於installshield更是望洋兴叹 installshieldhttp://www.yesky.com/20010128/154960.shtml http://202.109.129.7/softasp/softasp/jxshow10.asp?class1=4&class2=1注册码IDPRF8-0622-A000310304 推荐程度 支持WINDOWS风格安装 password:Day4Night http://saturn.installshield.com/ispro/630/full/IPSE630.exePassword : Day4Night Serial : IDPRF8-0622-A000310304 http://powerpb1.home.sohu.com/installshield.htm 用VB的打包工具啊,可以做的。如果希望在选单中添加卸载程序选项,可以在制作安装程序包时加入相应的程序项。VB 6的“Package & Deployment 向导”支持安装程序创建自己的程序组和选单项。在“Package & Deployment 向导”的“启动选单项”一步,选择“新建项”按钮,此时会出现一个对话框。在对话框的 “名称”文本框中输入选单项的名称,如“卸载VBTerm”。在“目标”框中输入卸载项的命令为:$(WinPath)\st6unst.exe -n ″$(AppPath)\ST6UNST.LOG″ 。然后选择确定关闭该对话框。这样生成的安装程序中将包括一个卸载程序的选单项。 使用 VB 编写自动反安装的程序如果您安装了某一个软件之后,想要反安装,您有二个方法: 1、打开【控制面板】中的【添加删除新程序】,选择该软件來反安装。 2、选择【开始】【程序集】中软件所产生的程序組中的反安装。 上面的第一种方法,您不需要作任何处理,一般软件在安装完后,都会在【控制面板】中的【添加删除新程序】多一个该软件的选项。而第二种方法,就必须要我们编写程序來解决了! 假设,今天我们编写了一个程序叫 Test,当您完成 Test.exe 之后,您必须再多编写一个自动反安装的程序,我们將文件名称设为 unTest.exe(先不要管如何编写,后面会說明)。二支程序都完成后,您使用 VB 提供的应用程序安装向导(Application Setup Wizard) 來制作安装程序時,必须额外再加入 unTest.exe! 加入 unTest.exe 之后,使用者安装后,安装程序並不会在【开始】【程序集】中该系統所产生的程序組【Test】中加入这个自动反安装程序 unTest.exe 的捷径,安装程序只会將unTest.exe 连同 Test.exe 一起复制到应用程序的目录中而已!所以如果您想产生unTest.exe 的捷径,您可能需要稍微修改一下 VB 提供的应用程序安装向导程序! 以下我们就实际來看看 unTest.exe 程序如何编写: 在 VB 中建立一个新文档,取名为 unTest.vbp,表单为 unTest.frm,不需要任何控制项,在表单中加入以下程序代码: Private Declare Function GetWindowsDirectory Lib "kernel32" _ Alias "GetWindowsDirectoryA" _ (ByVal lpBuffer As String, ByVal nSize As Long) As Long Private Sub Form_Load() On Error Goto BaddUn Dim X& Dim buffer As String * 128 Dim UnStr As String Dim size As Integer Dim retval As Integer buffer = Space$(128) size = 128 retval = GetWindowsDirectory(ByVal buffer, ByVal size) Me.Caption = buffer '以下的程序代码必须编写在同一行中 '''''''''''''''''''''''''''''''''''''''' UnStr = Me.Caption & "\ST5UNST.EXE -n " & Chr(34) & App.Path & "\ST5UNST.LOG" & Chr(34) '''''''''''''''''''''''''''''''''''''''' 'MsgBox UnStr '可显示可不显示, 只是测试用 'X& = Shell("C:\WINDOWS\ST5UNST.EXE -n " ' "C:\Program Files\App Name\ST5UNST.LOG"" ' ", vbNormalFocus) X& = Shell(UnStr, vbNormalFocus) Unload Me Exit Sub BaddUn: MsgBox "for some reason UnInstall can not run." Exit Sub End Sub 由以上的程序代码中,您是否发现, unTest.exe 必须和 St5unst.log 放在同一个目录中,不过这只要和上面的程序一样使用 App.Path 就可以解决了! 注:这个示例是使用 VB5 來做测试的,如果是其他版本的 VB,ST5UNST.LOG 可能必须改变! 以上文章是从网上摘来,并不是出自我手。 一般是写个log,然后反操作 TO: 回复人: sunnycai(飞鸟) ( ) 信誉:100 以上文章我看过,因为有:注:这个示例是使用 VB5 來做测试的,如果是其他版本的 VB,ST5UNST.LOG 可能必须改变! 所以我认为VB6.0是否适用,*.log文件应怎样更改才是不过还是谢谢大家的参与 反安装无非是删除文件,反注册(dll,ocx ,regedit...),这2件事你自己来完成这些事就是了 ,log 怎么写自己定 如何播放DLL中的WAV? 还是写不出这个sql语句,谁帮我写一下? combolbox写不入数据! mschart 控件的一个问题 怎样判断软件是否安装? 晕,treeview,我找不到删除被点击节点的方法,救我 关于远程控制的问题? 怎样把vb中的整个窗体图形保存为位图啊?请高手指教!急! 怎样使窗体显示在任务栏中? 有VB.NET,大家看看 哪位高手帮我看看这段代码为什么在VB6中调试通不过!!! 什么情况下会造成Word宏中CreateObject("scripting.filesystemobject")报“ActiveX部件不能创建对象”?
我看到过VB5.0的反安装程序,但它提示
VB6.0有不同,是这样的吗?
setupbuider我有,可不太会用
至於installshield更是望洋兴叹
http://202.109.129.7/softasp/softasp/jxshow10.asp?class1=4&class2=1
注册码IDPRF8-0622-A000310304
推荐程度 支持WINDOWS风格安装 password:Day4Night
http://saturn.installshield.com/ispro/630/full/IPSE630.exePassword : Day4Night
Serial : IDPRF8-0622-A000310304 http://powerpb1.home.sohu.com/installshield.htm
如果希望在选单中添加卸载程序选项,可以在制作安装程序包时加入相应的程序项。VB 6的“Package & Deployment 向导”支持安装程序创建自己的程序组和选单项。在“Package & Deployment 向导”的“启动选单项”一步,选择“新建项”按钮,此时会出现一个对话框。在对话框的 “名称”文本框中输入选单项的名称,如“卸载VBTerm”。在“目标”框中输入卸载项的命令为:$(WinPath)\st6unst.exe -n ″$(AppPath)\ST6UNST.LOG″ 。然后选择确定关闭该对话框。这样生成的安装程序中将包括一个卸载程序的选单项。
如果您安装了某一个软件之后,想要反安装,您有二个方法:
1、打开【控制面板】中的【添加删除新程序】,选择该软件來反安装。
2、选择【开始】【程序集】中软件所产生的程序組中的反安装。 上面的第一种方法,您不需要作任何处理,一般软件在安装完后,都会在【控制面板】中的【添加删除新程序】多一个该软件的选项。而第二种方法,就必须要我们编写程序來解决了! 假设,今天我们编写了一个程序叫 Test,当您完成 Test.exe 之后,您必须再多编写一个自动反安装的程序,我们將文件名称设为 unTest.exe(先不要管如何编写,后面会說明)。二支程序都完成后,您使用 VB 提供的应用程序安装向导(Application Setup Wizard) 來制作安装程序時,必须额外再加入 unTest.exe! 加入 unTest.exe 之后,使用者安装后,安装程序並不会在【开始】【程序集】中该系統所产生的程序組【Test】中加入这个自动反安装程序 unTest.exe 的捷径,安装程序只会將unTest.exe 连同 Test.exe 一起复制到应用程序的目录中而已!所以如果您想产生unTest.exe 的捷径,您可能需要稍微修改一下 VB 提供的应用程序安装向导程序! 以下我们就实际來看看 unTest.exe 程序如何编写: 在 VB 中建立一个新文档,取名为 unTest.vbp,表单为 unTest.frm,不需要任何控制项,在表单中加入以下程序代码: Private Declare Function GetWindowsDirectory Lib "kernel32" _
Alias "GetWindowsDirectoryA" _
(ByVal lpBuffer As String, ByVal nSize As Long) As Long Private Sub Form_Load()
On Error Goto BaddUn
Dim X&
Dim buffer As String * 128
Dim UnStr As String
Dim size As Integer
Dim retval As Integer
buffer = Space$(128)
size = 128
retval = GetWindowsDirectory(ByVal buffer, ByVal size)
Me.Caption = buffer
'以下的程序代码必须编写在同一行中
''''''''''''''''''''''''''''''''''''''''
UnStr = Me.Caption & "\ST5UNST.EXE -n " & Chr(34) & App.Path & "\ST5UNST.LOG" & Chr(34)
''''''''''''''''''''''''''''''''''''''''
'MsgBox UnStr '可显示可不显示, 只是测试用
'X& = Shell("C:\WINDOWS\ST5UNST.EXE -n "
' "C:\Program Files\App Name\ST5UNST.LOG""
' ", vbNormalFocus)
X& = Shell(UnStr, vbNormalFocus)
Unload Me
Exit Sub
BaddUn:
MsgBox "for some reason UnInstall can not run."
Exit Sub
End Sub
由以上的程序代码中,您是否发现, unTest.exe 必须和 St5unst.log 放在同一个目录中,不过这只要和上面的程序一样使用 App.Path 就可以解决了! 注:这个示例是使用 VB5 來做测试的,如果是其他版本的 VB,ST5UNST.LOG 可能必须改变!
以上文章是从网上摘来,并不是出自我手。
回复人: sunnycai(飞鸟) ( ) 信誉:100
以上文章我看过,因为有:注:这个示例是使用 VB5 來做测试的,如果是其他版本的 VB,ST5UNST.LOG 可能必须改变! 所以我认为VB6.0是否适用,*.log文件应怎样更改才是不过还是谢谢大家的参与
你自己来完成这些事就是了 ,log 怎么写自己定