<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../Include/Connect.asp"-->
<%
set rs = server.CreateObject("adodb.recordset")
sql="select TOP 1 * from Show5_ALLUser Order By NewID()"
rs.open sql,cn,1,1
response.redirect "hompy.asp?username="&rs("Username")&""
rs.close
set rs=nothing
%>