UC知道vb读取asp数据 高手进!!
来源：百度知道 编辑：UC知道 时间：2024/05/29 09:32:04
asp页面代码:
if not rs.eof then
for i = 1 to rs.RecordCount %>
<%=rs("id") &vbcrlf%>
<%=rs("us") &vbcrlf %>
<%=rs("dq") &vbcrlf %>
<%=rs("dh") &vbcrlf %>
<%=rs("sl") &vbcrlf %>
<% rs.movenext
if rs.eof Then Exit For
next
end if
rs.close
%>
上面这个就是一个asp页面,他是循环打印数据在页面上,而且是不换行的...
我现在遇到一个问题就是要用vb的ListView或DataGrid读出来,按照格式...
最好是用ListView,因为我对这个控件比较熟悉!
要求不会出错,代码简洁...没拉!!
回答满意追满分!!!
if not rs.eof then
for i = 1 to rs.RecordCount %>
<%=rs("id") &vbcrlf%>
<%=rs("us") &vbcrlf %>
<%=rs("dq") &vbcrlf %>
<%=rs("dh") &vbcrlf %>
<%=rs("sl") &vbcrlf %>
<% rs.movenext
if rs.eof Then Exit For
next
end if
rs.close
%>
上面这个就是一个asp页面,他是循环打印数据在页面上,而且是不换行的...
我现在遇到一个问题就是要用vb的ListView或DataGrid读出来,按照格式...
最好是用ListView,因为我对这个控件比较熟悉!
要求不会出错,代码简洁...没拉!!
回答满意追满分!!!
最好是将ASP文件贴出来，才更好帮你解决问题。
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=database\a.mdb;Persist Security Info=False"
rs.CursorLocation = adUseClient
rs.Open "select * from [aaa] ", conn, adOpenKeyset, adLockOptimistic
Set DataGrid1.DataSource = rs
rs.Close
conn.Close
Set rs = Nothing
Set conn = Nothing
你要说明这些数据是放在什么标签中的，标签的id是什么，才好编程啊，最好把这一段asp文件的上下文贴上，好帮你解决
最好是把整个asp文件贴出来。
另外，只有asp是没有取出数据的，你的意思是否是从asp运行后生成的页面来取数据？
oh .that is very easy.