复件 index.asp

读取磁盘序列号 读取磁盘序列号 读取磁盘序列号

<!--#include file="database.ini"-->
<%
sql="select times from zu where xh='" & request("id") & "'"
rsdb rs,sql
if rs.eof then
	response.write "请获得正版的激活序列号！"
	response.end
else
	sql="select id from fu where xlh='" & request("strxlh") & "' and xh='" & request("xh") & "' and xdh='" & request("strxdh") & "' and id='" & request("id") & "'"
	rsdb rs1,sql
	if not(rs1.eof) then
		response.write "ok"
		response.end
	end if
	rs1.close
	sql="select * from fu id='" & request("id") & "'"
	rsdb rs1,sql
	if rs1.eof then
		sql="insert into (xlh,xh,xdh,id) values ('" & request("strxlh") & "','" & request("strxh") & "','" & request("strxdh") & "','" & request("id") & "')"
		rsdb rs2,sql
		response.write "ok"
		response.end
	else
		if cint(times)>rs1.recordercount then
			sql="insert into (xlh,xh,xdh,id) values ('" & request("strxlh") & "','" & request("strxh") & "','" & request("strxdh") & "','" & request("id") & "')"
			rsdb rs3,sql
			response.write "ok"
			response.end
		else
			response.write "你的序列号已经超出其所能激活的计算机台数！"
			response.end
		end if
	end if
	rs1.close
end if
rs.close
set conn=nothing
%>