62,248
社区成员
发帖
与我相关
我的任务
分享一小段代码，很简单，请教各位！！！
<%@Import Namespace="System.Data"%>
<%@Import Namespace="System.Data.Sqlclient"%>
<script runat="server">
Sub page_load()
dim ds as new dataset()
dim con as sqlconnection
dim ada as sqldataadapter
con=new sqlconnection(configurationsettings.appsettings("sales"))
ada=new sqldataadapter("select companyname,address from customers",con)
ada.fill(ds,"customers")
dg.datasource=ds.tables("customers").defaultview
dg.databind()
End sub
</script>
<body>
<form runat="server">
<asp:datalist id="dg" runat="server"/>
</form>
</body>
<%@Import Namespace="System.Data.Sqlclient"%>
<script runat="server">
Sub page_load()
dim ds as new dataset()
dim con as sqlconnection
dim ada as sqldataadapter
con=new sqlconnection(configurationsettings.appsettings("sales"))
ada=new sqldataadapter("select companyname,address from customers",con)
ada.fill(ds,"customers")
dg.datasource=ds.tables("customers").defaultview
dg.databind()
End sub
</script>
<body>
<form runat="server">
<asp:datalist id="dg" runat="server"/>
</form>
</body>
...全文
请发表友善的回复…
发表回复
rickjelly2004 2004-08-27
- 打赏
- 举报
是你的DATAGRID中没有设置绑定的列，你大开属性编辑器就知道了，
你新建两列命名，在绑定TABLE的变量中添companyname 和address
然后就可以得到数据了，不过象他们说的最好加一个NOT ISPOSTBACK
你新建两列命名，在绑定TABLE的变量中添companyname 和address
然后就可以得到数据了，不过象他们说的最好加一个NOT ISPOSTBACK
pingnt 2004-08-27
- 打赏
- 举报
最好这样:
Sub page_load()
if not ispostback then
dim ds as new dataset()
dim con as sqlconnection
dim ada as sqldataadapter
con=new sqlconnection(configurationsettings.appsettings("sales"))
ada=new sqldataadapter("select companyname,address from customers",con)
ada.fill(ds,"customers")
dg.datasource=ds.tables("customers").defaultview
dg.databind()
end if
End sub
'还要注意数据库中本身是否有数据或满足条件的记录.
Sub page_load()
if not ispostback then
dim ds as new dataset()
dim con as sqlconnection
dim ada as sqldataadapter
con=new sqlconnection(configurationsettings.appsettings("sales"))
ada=new sqldataadapter("select companyname,address from customers",con)
ada.fill(ds,"customers")
dg.datasource=ds.tables("customers").defaultview
dg.databind()
end if
End sub
'还要注意数据库中本身是否有数据或满足条件的记录.
aduan1026 2004-08-27
- 打赏
- 举报
加上:if not ispostback
MyXQ 2004-08-27
- 打赏
- 举报
ispostback
loverdotnet 2004-08-27
- 打赏
- 举报
为何我的页面上看不到任何数据?
qiao198 2004-08-27
- 打赏
- 举报
try
dim ds as new dataset()
dim con as sqlconnection
dim ada as sqldataadapter
con=new sqlconnection(configurationsettings.appsettings("sales"))
ada=new sqldataadapter("select companyname,address from customers",con)
ada.fill(ds,"customers")
dg.datasource=ds.tables("customers").defaultview
dg.databind()
Catch ex As Exception
Response.Write(ex)
End Try
dim ds as new dataset()
dim con as sqlconnection
dim ada as sqldataadapter
con=new sqlconnection(configurationsettings.appsettings("sales"))
ada=new sqldataadapter("select companyname,address from customers",con)
ada.fill(ds,"customers")
dg.datasource=ds.tables("customers").defaultview
dg.databind()
Catch ex As Exception
Response.Write(ex)
End Try
qiao198 2004-08-27
- 打赏
- 举报
你用
try
。。。
Catch ex As Exception
Response.Write(ex)
End Try
可以看看
try
。。。
Catch ex As Exception
Response.Write(ex)
End Try
可以看看
