mes_downline.asp

来自「在线考试系统」· ASP 代码 · 共 28 行

<%@ Language=VBScript %>

<% option explicit %>

<!-- #include file="conn_webqq.asp" -->
<!-- #include file="inc_session.asp" -->

<%


	dim uid
	uid=GetSession

	dim sSQL

	if uid<>"" then
		sSQL="DELETE * FROM tOnline WHERE uid='" & uid & "'"
		connq.execute sSQL
	end if

	call closeconnq

%>

<script language="vbscript">
	window.close()
</script>