ASP问题求教高手

来源:百度知道 编辑:UC知道 时间:2024/06/05 16:07:00
<%
function showline(llmid,slmlc)
dim sslmlc,slmlj
dim rs
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from oa_xxzx_lmzd where lmid=" & llmid,conn,1,1
if rs.EOF then
rs.Close
exit function
end if
sslmlc= slmlc & ">>" & rs("lmmc")

'显示本级
if strType="ADD" then '发布
if instr("," & rs("fbqx") & ",","," & session("uYGBH") & ",")>0 then
Response.Write "<option value='" & rs("lmid") & "'>" & server.HTMLEncode(sslmlc) & "</option>" & vbcrlf
end if
else '修改
if instr("," & rs("fbqx") & ",","," & session("uYGBH") & ",")>0 or cstr(rs("lmid"))=cstr(lmid) then
if cstr(rs("lmi

条件语句会浪费时间来搜索内存地址空间.
使用查找select语言试试.

if这么多,条理很不清楚,最好不用select * ,do..while之类的

尽量不要检索所有记录