关于VB.net制作安装升级包的问题

[ang_e]

我需要读取注册表的值，而获取用户原来的安装路径。
在把相应的升级文件拷贝到原安装路径下覆盖原有文件。

其实好像挺简单的，但是就是找不到怎么做。
谢谢大家了！

[vb2014]

Dim Old as string 
Dim NewFile as string 
NewFile = 更新文件的位置
Old = My.Computer .Registry.LocalMachine.OpenSubKey("software").OpenSubKey("WInrar").GetValue("exe32") '读取以前软件的位置

Io.File .Delete(old) 
Io.File .Copy (NewFile,old)

[ang_e]

楼上是写代码了，在VB.net的制作安装文件的模块里好像找不到。
我现在已经放弃，改用setup factory了。

[berylan]

使用setup factory 在启动前加入代码

ProductPath = Registry.GetValue(HKEY_LOCAL_MACHINE, "Software\\Programname", "keyname", false);

if (ProductPath == "") then
	Error = Dialog.Message("提示", "此系统未安装骗人Programname。", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
	Application.Exit(0);
end
SessionVar.Set("%AppFolder%", ProductPath);

[abcde_king]

做个update.exe,程序启动先检测版本号。需更新则运行update.exe

[Tosp2012]

做一個更新程序Start.exe.
通過Start.ext啟動客戶端程序，檢查客戶端程序的版本和服務器的更新版本。
如果，客戶端程序的版本低，就刪除客戶端程序，之後Copy服務器的更新Exe.
啟動客戶端程序
me.close

[yanlongwuhui]

[Quote=引用 3 楼 ang_e 的回复:]
改用setup factory了。
[/Quote]
用的也是setup factory