logout.asp

来自「与P2PfilesharingJavaVersion.rar是和在一起的」· ASP 代码 · 共 22 行

<%@ Language=VBScript %>
<%Option Explicit%>
<!--#include file="adovbs.inc"-->
<%
	Dim sIPaddress
	Dim conn
		
	sIPaddress = trim(Request.QueryString("IP"))

	if sIPaddress="" then
		Response.End
	end if
	
	set conn = Server.CreateObject("ADODB.Connection")
	conn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=p2p;Data Source=developers"
	conn.Open
	
	conn.execute "delete from peer where ip_address='" & sIPaddress & "'"
	conn.Close
	set conn=Nothing
%>