UC知道向VB高手请教段代码．可用追加200分
来源：百度知道 编辑：UC知道 时间：2024/06/21 02:24:21
有个INI文件如下：
[Group1]
ServerAmount=1
Server1=
Ip1=59.60.218.203:9958
Pic1=Server1
ServerName1=
目的就是创建一个按钮,然后从远程的http://*.TXT中读取新的IP来替换 59.60.218.203这个IP,(请高手指点)
点击按钮后读取远程TXT文件，然后把本地INI文件的内容替换．
[Group1]
ServerAmount=1
Server1=
Ip1=59.60.218.203:9958
Pic1=Server1
ServerName1=
目的就是创建一个按钮,然后从远程的http://*.TXT中读取新的IP来替换 59.60.218.203这个IP,(请高手指点)
点击按钮后读取远程TXT文件，然后把本地INI文件的内容替换．
地球上本就没有远程读取文件这回事，N多年前有句名言说的好啊，“上网就是下载”，所谓远程读取文件，无非就是下载文件，然后读取
下面的代码是下载百度知道的logo图片，然后将其读入到控件Image1中，然后删除下载的图片文件
楼主自行把它改成下载一个文本文件，然后读取内容，再。。。。最后。。。。。不就达到目的了嘛
Private 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
Private Sub Form_Load()
URLDownloadToFile 0, "https://gss0.bdstatic.com/70cFsjip0QIZ8tyhnq/img/logo-zhidao.gif", "C:\百度知道.gif", 0, 0
Image1.Picture = LoadPicture("C:\百度知道.gif")
Kill "C:\百度知道.gif"
End Sub
ini操作函数
http://zhidao.baidu.com/question/41273946.html
使用前请初始化f