楼上厉害，学习!
Set w = CreateObject("wscript.shell")
w.regwrite "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName, App.Path & "\" & App.EXEName & ".exe"
还是把这个去掉吧,要不有点耍流氓,哈哈
| 全能ASP/PHP/ASP.NET主机，支持月付 | 专业 MSSQL 数据库空间，支持月付 | 专业 MySQL 数据库空间，支持月付 | 学习型 ASP/PHP/ASP.NET 主机 30元/年 |
| 高端软件开发 = 年薪十万不是梦 | 赛孚耐:软件保护加密专家 | 身份认证令牌USB KEY |
2007-12-20 18:50
2007-12-20 21:33
2008-6-5 17:16
2008-8-9 07:49
2008-8-9 11:30