判断((客户取回数据="服务器数据")=真)
真载入(窗口1)
假返回()
第二个说的验证密码是啥意思啊,验证什么密码,在服务器验证还是客户端验证呢这条命令直接就有返回值啊:
调用格式: 〈逻辑型〉 连接发信服务器 (文本型 发信邮件服务器地址,[整数型 端口号],[文本型 用户名],[文本型 密码],[整数型 最长等待时间]) - 互联网支持库->邮件发送
英文名称:ConnectSmtpServer
连接到指定的SMTP邮件发送服务器,成功返回真,失败返回假。本命令为初级命令。
参数<1>的名称为“发信邮件服务器地址”,类型为“文本型(text)”。指定用作发送邮件的SMTP邮件服务器地址。
参数<2>的名称为“端口号”,类型为“整数型(int)”,可以被省略。指定欲连接到SMTP邮件服务器上的端口号,如果本参数被省略,默认值为标准 25 端口。
参数<3>的名称为“用户名”,类型为“文本型(text)”,可以被省略。指定在SMTP邮件服务器上的用户帐号名称,如果本参数被省略,默认值为空文本,即无需登录。
参数<4>的名称为“密码”,类型为“文本型(text)”,可以被省略。指定在SMTP邮件服务器上的用户帐号密码,如果本参数被省略,默认值为空文本,即无需登录。
参数<5>的名称为“最长等待时间”,类型为“整数型(int)”,可以被省略。指定在发信过程中等待SMTP邮件服务器响应的最大时间,单位为毫秒,如果本参数被省略,默认值为 2000 毫秒。
*** 作系统需求: Windows
例程:
版本 2
支持库 spec
如果真(连接发信服务器 (“SMTPQQCOM”, ,QQ号 ,密码 , ))
调试输出 (“连接成功!”)
如果真结束
调试输出 (“连接不成功!”)
请采纳,谢谢!版本 2
子程序 _选择夹1_鼠标左键被按下, 逻辑型
参数 横向位置, 整数型
参数 纵向位置, 整数型
参数 功能键状态, 整数型
信息框 (选择夹1现行子夹, 0, , )版本 2
支持库 iext
程序集 窗口程序集1
程序集变量 客户, 文本型
子程序 __启动窗口_创建完毕
如果 (客户1连接 (“127001”, 19730))
信息框 (“成功连接!”, 0, )
否则
信息框 (“连接失败!”, 0, )
如果结束
子程序 _客户1_数据到达
局部变量 文本, 文本型
局部变量 文本组, 文本型, , "0"
局部变量 i, 整数型
局部变量 表项, 整数型
文本 = 取字节集数据 (客户1取回数据 (), #文本型, )
文本组 = 分割文本 (文本, “,”, )
表项 = 超级列表框1插入表项 (, , , , , )
计次循环首 (取数组成员数 (文本组), i)
超级列表框1置标题 (表项, i - 1, 文本组 [i])
计次循环尾 ()
子程序 _按钮1_被单击
服务器1发送数据 (客户, “服务主机IP,服务主机电脑名, *** 作系统,什么什么。。。”, 3)
子程序 _服务器1_客户进入
客户 = 服务器1取回客户 ()客户端1发送数据()
然后 服务端那边取回数据,用数据到达的事件子程序。
'声明一个字节集变量A
A=服务器1取回数据(服务器1取回客户())
A=到文本(A)
信息框(A)
添加到列表框你自己搞一下就好了,手机不方便。
!谢谢!
采纳吧!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)