<% TYPER=REQUEST("TYPER") BDPASS=REQUEST("BDPASS") IF BDPASS="aa" THEN SESSION("BOARDADMIN")="YES" END IF WR=REQUEST("WR") KEYWORD=REQUEST("KEYWORD") YR=REQUEST("YR") MH=REQUEST("MH") SERHBOOK=YR&"/"&MH PAGE=REQUEST("PAGE") IF PAGE="" THEN PAGE=1 END IF SN=REQUEST("SN") IF SN="" THEN SN="0" END IF Defdate=Dateadd("d",-Cint(SN),Date) your=request.form("your") if your="" then your=REQUEST.QUERYSTRING("user") end if IF SN="0" THEN SQL="SELECT*FROM Board where yourname like ('%" &your& "%') ORDER BY id2 desc" END IF %> 城市當舖-房貸一胎與二胎的專家 <% SET CN = SERVER.CREATEOBJECT("ADODB.CONNECTION") CN.OPEN "DRIVER={MICROSOFT ACCESS DRIVER (*.MDB)};DBQ="&SERVER.MAPPATH("/db/DATA.MDB") SET RS=SERVER.CREATEOBJECT("ADODB.RECORDSET") RS.OPEN SQL,CN,1,1,1 SET RS1=SERVER.CREATEOBJECT("ADODB.RECORDSET") RS1.OPEN "Select * FROM SETUP " ,CN,2,3 RS.PAGESIZE=10 %>