我做了一个登录查询系统，用户登录后保存 session("id")=rs("VENID")
seach.asp
<%
dim g_id
dim x_pluid
x_pluid = Request("s_tiaoma")
g_id=session("id")
%>
主要SQL语句：
<%
sqlt="select DISTINCT RE_STOCK_HEAD.DOCNO,RE_STOCK_HEAD.LITSUM,RE_STOCK_HEAD.AUDIDATE,VE_VENDORINFO.VENNAME,ST_DEPART.DSNAME,SY_SYSTEMUSER.USER_NAME from RE_STOCK_DETAIL inner join RE_STOCK_HEAD on RE_STOCK_DETAIL.DOCNO=RE_STOCK_HEAD.DOCNO left join VE_VENDORINFO on RE_STOCK_HEAD.VENID=VE_VENDORINFO.VENID left join ST_DEPART on RE_STOCK_HEAD.STOREID=ST_DEPART.STOREID left join SY_SYSTEMUSER on RE_STOCK_HEAD.HANDLE=SY_SYSTEMUSER.USER_ID where 1=1"
if session("id") <>"" then
sqlt=sqlt&"and RE_STOCK_HEAD.VENID='"&g_id&"'"
temp="RE_STOCK_HEAD.VENID='"&g_id&"'"
END if
if request("s_tiaoma") <>"" then
sqlt=sqlt&"and RE_STOCK_DETAIL.PLUID like '%"&x_pluid&"%'"
temp="RE_STOCK_DETAIL"="'%"&x_pluid&"%'"
end if
rst.open sqlt,conn,3,2
%>
显示分页：
<%
if page>1 then
response.write" <a href='?page=1&"&temp&"' class=a1>第一页 </a
