📄 dma.asp

📁 大家好

💻 ASP

字号:

<%@ Language=VBScript %>
<!-- #include file="../ADOVBS.INc" -->
<%
set conn=server.createobject("adodb.connection")
conn.open Application("DBCon_ConnectionString") 
set rs=server.createobject("adodb.recordset")
rs.locktype=adLockOptimistic
sqlstr="select * from xiaohua "
rs.open sqlstr ,conn,adOpenDynamic
%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>
<table align=center border=1 style="HEIGHT: 54px; WIDTH: 167px">
<%
if not rs.eof then
%><tr>
<%
	for i=0 to rs.Fields.Count-1 
%>
	<td><%=rs.Fields(i).name%></td>
<%
	next
%>
</tr>
<%
	
	while not rs.eof
%>
<tr>
<%
	for i=0 to rs.Fields.Count-1
%>
	<td><%=rs.Fields(i).Value%></td>
<%
	next
	rs.MoveNext 
%>
</tr>
<%
	wend
end if
%>
</tr>

</table>
</BODY>
</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -