如何通过循环语句(或其它)将,一个DataSet显示在界面并且,是一行三列?
如果用了DataList,(我试了,不太灵活,不能很好的控制间距,并且行与行之间不能加入其它的HTML元素),有没有完美的办法。
謝謝!
如果用了DataList,(我试了,不太灵活,不能很好的控制间距,并且行与行之间不能加入其它的HTML元素),有没有完美的办法。
謝謝!
解决方案 »
- 远程服务器返回错误: (500) 内部服务器错误。在线等,求高手帮忙
- 用了QueryString下载文件就变成下载页面
- FIELDTERMINATOR 什么作用
- 请高手帮助解决,一个提示框的实现
- 菜鸟提问: 请问我用的是asp:button控件,如何点击后条件满足后弹出一个对话框?
- 如何一次插入多条记录?(无论accsee或sql)
- 前两天好好的,突然断点调试速度变得好慢???
- 如何制作ASP.NET的安装程序?
- 我读取数据库里面的图片字段,怎么读出来的是乱码,请问那位高手能帮我解决一下呢?
- 请问怎么才能取到上传文件的文件名?
- 怎么用IPrincipal对用户判断(谢谢)分不够 换号加
- 类似于下面格式的随机数该如何产生?
If Not IsPostBack Then
Dim dsn As String = "server=(local);uid=sa;pwd=123;database=school"
Dim conn As SqlConnection = New SqlConnection(dsn)
conn.Open()
Dim strsql As String = "select sno,sname,ssex from student"
Dim ad As SqlDataAdapter = New SqlDataAdapter(strsql, conn)
Dim ds As New DataSet
ad.Fill(ds, "student")
Dim table_ As DataTable = ds.Tables("student")
conn.Close() Dim table_head As String = "<table border=""1""><tr><td>学号</td><td>姓名</td><td>性别</td></tr>"
Dim table_middle As String
Dim row As DataRow
Dim col As DataColumn
For Each row In table_.Rows
table_middle &= "<tr>"
For Each col In table_.Columns
table_middle &= "<td>" & row(col) & "</td>"
Next
table_middle &= "</tr>"
Next
Dim table_result As String = table_head & table_middle & "</table>"
Response.Write(table_result)
End If
End Sub如果将table_head ,table_middle,table_result 设为stringbuilder执行效率更好。
<ItemStyle HorizontalAlign="left"></ItemStyle><ItemTemplate><IMG style="cursor:hand" onclick='<%#"openmimg("+DataBinder.Eval(Container.DataItem,"mcateid")+")"%>' border=0 height="180" src='<%#@"SystemManager\Magazine\upload\"+DataBinder.Eval(Container.DataItem,"titleimg")%>' width="150"> <script> <!--
function openmimg(pmid)
{
location.href="MagazineList.aspx?cateid="+pmid;
}//--></script><br>
<div align="center" class="word4"><%#DataBinder.Eval(Container.DataItem,"mcatename")%></div></ItemTemplate></asp:DataList>
如果一行4列,但共2条记录,那么这个列是平均分配列间距(占用的3列4列的位置),不能靠左对齐。