当前位置：首页 -> 技术开发 -> 程序开发 -> 如何使用VB编写自动反安装的程序

如何使用VB编写自动反安装的程序

时间： 2021-07-31 作者：daque

即使您安置了某一个软硬件之后，想要反安置，您有二个本领：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 longprivate sub form_load()on error goto baddundim x&dim buffer as string * 128dim unstr as stringdim size as integerdim retval as integerbuffer = space$(128)size = 128retval = 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 meexit subbaddun:msgbox "for some reason uninstall can not run."exit subend sub由之上的步调代码中，您能否创造， untest.exe 必需和 st5unst.log 放在同一个目次中，然而这只有和上头的步调一律运用 app.path 就不妨处置了！注：这个示例是运用 vb5 來做尝试的，即使是其余本子的 vb，st5unst.log 大概必需变换！

如何使用VB编写自动反安装的程序

相关推荐

推荐下载

热门阅览

最新排行