1.易语言循环提取数组成员提取数组成员
2.悬赏200分!易语言qq邮语!发源用易语言写软件发邮件,码易码源码怎么办想使用代理IP的群发器源话,应该用什么代码来验证是易语言qq邮语源码搜索串否成功连接代理IP!
3.谁会用易语言做强行打开摄像头的发源风火递源码软件
易语言循环提取数组成员提取数组成员
.版本 2
.支持库 spec
.子程序 _按钮1_被单击
.局部变量 t, 文本型
.局部变量 temp, 文本型, , "0"
t = “qf_booked_feedback&id=bb5da4bcdceab3df8aefe5a&to=@qq.com”
temp = 分割文本 (t, “=”, )
调试输出 (temp [取数组成员数 (temp)])
悬赏分!!码易码用易语言写软件发邮件,群发器源想使用代理IP的易语言qq邮语话,应该用什么代码来验证是发源否成功连接代理IP!
精益模块有个功能子程序名:网页_置浏览器代理
设置当前程序中浏览器的码易码代理,不影响外部浏览器使用
参数<1>的名称为“代理IP”,类型为“文本型”,群发器源允许接收空参数数据。易语言qq邮语招生专题源码注明:格式ip地址+端口,发源例如..1.:,码易码vb 源码报表留空为取消代理。
这个时候用内部的浏览框1 访问一下 百度查询一下IP就可以知道是否成功连接代理IP了
或者用IP 例如
.版本 2.支持库 HtmlView
网页_置浏览器代理 (编辑框2.内容)
超文本浏览框1.地址 = “/ic.asp”
谁会用易语言做强行打开摄像头的软件
删除文件 (取运行目录 () + “\temp\temp.bmp”)
编辑框4.内容 = 取运行目录 () + “\temp\临时照片.jpg”
.子程序 启动摄像头
.局部变量 计次, 整数型
.计次循环首 (视频设备1.来源总数, 计次)
视频设备1.当前来源 = 计次
.计次循环尾 ()
.如果真 (视频设备1.预览 (真, ) = 假)
启动摄像头 ()
(邮件发送)
.版本 2
.支持库 EThread
.支持库 internet
.支持库 xplib
.程序集 窗口程序集1
.程序集变量 账户, 文本型
.程序集变量 主题, 文本型
.程序集变量 密码, 文本型
.程序集变量 邮件内容, 文本型
.子程序 _按钮1_被单击, , , 需要在QQ邮箱中账号中设置
.如果真 (编辑框账号.内容 = “” 或 编辑框密码.内容 = “”)
信息框 (“帐号密码不能为空”, 0, )
返回 ()
.如果真结束
.如果真 (接收邮件地址.内容 = “”)
信息框 (“请设定群发目标起始号码”, 0, )
返回 ()
.如果真结束
账户 = 编辑框账号.内容
密码 = 编辑框密码.内容
主题 = 编辑框主题.内容
邮件内容 = 编辑框邮件内容.内容
接收方 = 到整数 (接收邮件地址.内容)
启动线程 (&线程, , 句柄)
.子程序 线程
.局部变量 返回文本, 文本型
.局部变量 临时文本, 文本型
.局部变量 循环次数, 整数型
.如果 (连接发信服务器 (“smtp.qq.com”, , 账户, 密码, ))
返回文本 = “连接发信服务器成功” + #换行符
临时文本 = 发送邮件 (主题, 邮件内容, 到文本 (接收方) + “@QQ.com”, , , 账户 + “@QQ.com”, )
.判断开始 (临时文本 ≠ “”)
返回文本 = “发送失败:” + 临时文本 + #换行符
.默认
返回文本 = “发送成功。” + #换行符
.判断结束
.否则
返回文本 = “连接发信服务器失败” + #换行符
.如果结束
调试编辑框.内容 = 返回文本
断开发信服务器 ()
关闭线程句柄 (句柄)
.子程序 __启动窗口_创建完毕
XP风格 (3)