我说下我的思路。
1。创建批处理文件(bat)
2。运行批处理文件。
下面是创建批处理文件里面的内容的函数。
Function pichuli_ris()
'以下是创建批处理文件-从FTP服务器上下载升级包开始
Dim Str1
srr1 = ""
Str1 = Str1 & "echo open 1012844 >>d:\ftptxt" & Chr(13) & Chr(10)
Str1 = Str1 & "echo ftp>>d:\ftptxt" & Chr(13) & Chr(10) '用户名是ftp
Str1 = Str1 & "echo a>>d:\ftptxt" & Chr(13) & Chr(10) ' 密码是a
Str1 = Str1 & "echo get user\11\RIS2010exe c:\tmp\RIS2010exe >>d:\ftptxt" & Chr(13) & Chr(10)
Str1 = Str1 & "echo quit >>d:\ftptxt" & Chr(13) & Chr(10)
Str1 = Str1 & "ftp -s:d:\ftptxt" & Chr(13) & Chr(10)
Str1 = Str1 & "del d:\ftptxt" & Chr(13) & Chr(10)
Str1 = Str1 & "c:\tmp\ris2010exe"
pichuli_ris = str1
'以上是创建批处理文件-从FTP服务器上下载升级包结束
End Function按照你的描述,你首先调用Socket(adderss,port)生成了一个socket,然后你要调用connect连接服务端,connect返回成功后才能通信。不知道你有没有connect。版本 2
子程序 按钮被单击
客户1发送数据 (编辑框1内容+“一个标记”+编辑框2内容)
子程序 _服务器1_数据到达
局部变量 文本组, 文本型, , "0"
文本组 = 分割字节集 (服务器1取回数据 (), 到字节集 (“一个标记”), )
写到文件 (“1txt”, 文本组 [1] + #换行符 + 文本组 [2])如果想得到别人的服务器JSP文件的话是不可能的,除非你能攻下他的服务器。 /// <summary>/// 获取远程页面的HTML/// </summary>/// <param name="url">远程地址</param>/// <returns></returns>protected string Get>
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)