<% Server.ScriptTimeOut=90 ON ERROR RESUME NEXT '--------- fwfh=fwwzjc("/inc/fwpbip1.txt","") if fwfh="ER_0" then response.end end if '---------- 'zxsnr:����ʾ����,ztm1:����Ŀ,fts1:����ʾ,fxxjs:����ϸ����,fxgnr��������� dim Tname,dhname,wynrms,wykey,strtxt,nrzsz,nrzszgs,i1,key,id,ztm1,fts1,fxxjs,fxgnr '�����ݣ��������飬����������� 'ר�ñ��� dim zxsnr1,fl id=request("id") if id="" then Response.Redirect("/tools/lyjd/") Response.End end if strtxt=f_readall("lysqidzh.tat") strtxt=Getcontent(strtxt,"{{"&id&"}}","{{",0) Tname=strtxt if Tname<>"" then wynrms=replace(Tname,"_"," ")&"���ξ���" wykey=replace(Tname,"_"," ")&"���ξ���" dhname=" �� "&replace(Tname,"_"," ")&"���ξ���" Tname=Tname&"���ξ���_" end if %> <%=Tname%>���ξ����ȫ_ʵ�ò�ѯ
<% server.execute("lysqlb/lysq"&id&".tat") %>
<% response.write gg_sccl1(5,300,300,1,1) response.write gg_sccl1(5,300,300,2,1) response.write gg_sccl1(5,300,300,3,1) %>
<% response.write gg_sccl1(10,120,270,1,1) response.write gg_sccl1(10,120,270,2,1) response.write gg_sccl1(10,120,270,3,1) %>