QQEMAIL smtp服务器地址:smtpqqcom
网易163服务器地址:smtp163com
还有很多,你最好多多检查下代码!自己写俩软件 一个建个服务器组件 一个是客户端组件
客户端连接上服务器以后 发送数据 最前面加个标识符 比如前面加个Y是用户名 M是密码
然后服务器收到数据以后 判断以下收到的数据取文本最前面标识符是什么 然后相应自己写出到一个TXT文件里保存
以此类推 以这种发送封包然后服务器判断封包标识符来保存这些数据
服务器最后再加上 判断客户端登录的帐号 然后发送数据 也是用封包传送 等级 物品 金钱之类的东西 客户端登录成功以后 通过服务器来获取这些信息
如果你觉得麻烦的话直接保存到他本地的文件里 写配置项然后加密 保存到C盘他一般找不到的地方 然后每次打开的时候读取本地保存的配置项就可以了利用服务器控件和客户控件可以做出一个局域网的登录、控制系统源码如下: 版本
2
支持库
sock程序集
窗口程序集1
程序集变量
用户,
文本型
程序集变量
密码,
文本型子程序
__启动窗口_创建完毕
局部变量
IP,
文本型,
,
"0"IP
=
取本机IP
()
编辑框1内容
=
IP
[1]子程序
_服务器_数据到达
局部变量
数据,
文本型数据
=
删首尾空
(到文本
(服务器取回数据
()))
用户
=
取文本左边
(数据,
寻找文本
(数据,
“#”,
,
真)
-
1)
密码
=
取文本右边
(数据,
取文本长度
(数据)
-
寻找文本
(数据,
“#”,
,
真))
信息框
(“有用户登录:”
+
#换行符
+
用户
+
#换行符
+
密码,
0,
)
子程序
_按钮1_被单击客户连接
(编辑框1内容,
19730)
客户发送数据
(到字节集
(编辑框2内容
+
“#”
+
编辑框3内容))
子程序
_服务器_客户进入输出调试文本
(服务器取回客户
())版本 2
子程序 _按钮1_被单击
如果 (连接发信服务器 (“smtp163com”, , 你的帐号, 你的密码, 3000) = 真)
信息框 (“连接成功”, 0, )
否则
信息框 (“连接失败”, 0, )
如果结束
' 注释:你的帐号为不带@163com,帐号和密码都要用“”
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)