老兄 能不能帮帮我关于VB自动升级的问题 我的QQ 814152666 我会给分的

老兄 能不能帮帮我关于VB自动升级的问题 我的QQ 814152666 我会给分的,第1张

Private Declare Function icePub_renewByCmdLine Lib "icePubDlldll" (ByVal strAppCaption As String) As Integer

Private Declare Function icePub_open2 Lib "icePubDlldll" (ByVal strPath As String, ByVal strCmdLineParam As String) As Integer

Private Sub Command1_Click()

'此按钮为更新 *** 作

Dim a2 As Integer

Dim str1 As String

str1 = AppPath + "\" + AppEXEName + "exe"

a2 = icePub_open2("d:\download\newexe", str1)

'newexe为自身新版应用程序(比如通过inet下载得到),最后目的是让newexe更新到当前应用程序本身的exe(即str1的内容)

End

'结束旧版应用程序

End Sub

Private Sub Form_Load()

Dim a2 As Integer

a2 = icePub_renewByCmdLine("")

If a2 < 0 Then

End

'更新成功,结束本身新版临时程序,即上边的d:\download\newexe

End If

End Sub

vb6之上再没有vb版本了,取而代之的是vbnet。但是实质上这是两种完全不同的语言。在vs里微软提供了升级vb的工具,你可以直接右击vb工程文件,打开方式选C:\Program Files (x86)\Microsoft Visual Studio 100\Common7\IDE\devenvexe。此时会自动升级。基本上90%的代码能自动转换,但是由于是完全不同的两种语言,转换后会有许多问题,需要你手动修改。例如数组下标,数据类型,vb常量,和一些vb语句等等,有的控件换成了新的控件取而代之,例如菜单,有的属性已经完全被移除,例如标签是否允许多行显示,还有对于画面的坐标计算单位也发生了变化。

还有更令人头疼的是vb里引用的activeX控件,这些控件是不会升级的,net会将其封装成dll以com的形式引入到工程里,但是调用的速度要慢很多,这也导致升级后性能反而降低。所以一般升级后都采用对应的net版本的控件,而一些控件压根就没有对应net版本的。

我原来写的一个自动升级程序,是在服务器站用了一个ini文件,记录exe的版本号,然后使用URLDownloadToFile下载到本地,然后与本地文件进行对比,如果版本号不一样,再使用URLDownloadToFile下载exe文件到本地

Public Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long

Public Declare Function DeleteUrlCacheEntry Lib "wininet" Alias "DeleteUrlCacheEntryA" (ByVal lpszUrlName As String) As Long

'//

'/函数功能:从服务器下载文件

'/参数说明:参数一 服务器文件路径,本地文件路径

'/编 写 人:于莹莹

'/编写日期:2007-8-28

'//

Public Function DownloadFile(url As String, LocalFilename As String) As Boolean

Dim lngRetVal As Long

lngRetVal = URLDownloadToFile(0, url, LocalFilename, 0, 0)

If lngRetVal = 0 Then

DownloadFile = True

DeleteUrlCacheEntry url

End If

End Function

使用方法:

DownloadFile ">

你要怎样的功能,

我自己刚写了一个自动更新的

是用>

以上就是关于老兄 能不能帮帮我关于VB自动升级的问题 我的QQ 814152666 我会给分的全部的内容,包括:老兄 能不能帮帮我关于VB自动升级的问题 我的QQ 814152666 我会给分的、vb6.0 sp6能直接升级到vs2010吗、VB6.0 制作升级程序等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zz/10640809.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-10
下一篇 2023-05-10

发表评论

登录后才能评论

评论列表(0条)

保存