我是这么写的,但是点击选择后没有反应......
<%@ Page Language="vb" Debug="true" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.OleDb" %>
<script runat="server"> public sub page_load (sender As Object,e As EventArgs)
dim strconn,strsql as string
dim myconn as OleDBConnection
dim mycommand as OleDBCommand
Dim dr As OleDbDataReader
strconn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath(".") & "/db1.mdb"
strsql="select * from guestbook"
myconn = new OleDBConnection(strconn)
mycommand = new OleDBCommand(strsql,myconn)
myConn.Open()
datalist1.DataSource=mycommand.ExecuteReader()
datalist1.DataBind()
myConn.close()
end sub
private sub datalist1_ItemCommand(sender as object, e as datalistcommandeventargs)
if e.CommandName = "select" then
datalist1.selectedIndex=e.Item.ItemIndex
Datalist1.Databind()
else
response.write("wrong")
end if
end sub</script>
<html>
<head>
</head>
<body>
<form runat="server">
<asp:DataList id="DataList1" runat="server" Width="264px">
<ItemTemplate>
<tr>
<td>
<%#DataBinder.Eval(Container.DataItem,"name")%>
</td>
<td>
<asp:button runat="server" Text="select" CommandName="select" ID="id" />
</td>
<td></td>
</tr>
</ItemTemplate>
<SelectedItemTemplate>
<tr>
<td>
name:<%#DataBinder.Eval(Container.DataItem,"name")%>
<br />
ID:<%#DataBinder.Eval(Container.DataItem,"id")%>
<br />
message:<%#DataBinder.Eval(Container.DataItem,"message")%>
<br />
time:<%#DataBinder.Eval(Container.DataItem,"time")%>
<br />
</td>
</tr>
</SelectedItemtemplate>
</asp:DataList>
</form>
</body>
</html>
<%@ Page Language="vb" Debug="true" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.OleDb" %>
<script runat="server"> public sub page_load (sender As Object,e As EventArgs)
dim strconn,strsql as string
dim myconn as OleDBConnection
dim mycommand as OleDBCommand
Dim dr As OleDbDataReader
strconn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath(".") & "/db1.mdb"
strsql="select * from guestbook"
myconn = new OleDBConnection(strconn)
mycommand = new OleDBCommand(strsql,myconn)
myConn.Open()
datalist1.DataSource=mycommand.ExecuteReader()
datalist1.DataBind()
myConn.close()
end sub
private sub datalist1_ItemCommand(sender as object, e as datalistcommandeventargs)
if e.CommandName = "select" then
datalist1.selectedIndex=e.Item.ItemIndex
Datalist1.Databind()
else
response.write("wrong")
end if
end sub</script>
<html>
<head>
</head>
<body>
<form runat="server">
<asp:DataList id="DataList1" runat="server" Width="264px">
<ItemTemplate>
<tr>
<td>
<%#DataBinder.Eval(Container.DataItem,"name")%>
</td>
<td>
<asp:button runat="server" Text="select" CommandName="select" ID="id" />
</td>
<td></td>
</tr>
</ItemTemplate>
<SelectedItemTemplate>
<tr>
<td>
name:<%#DataBinder.Eval(Container.DataItem,"name")%>
<br />
ID:<%#DataBinder.Eval(Container.DataItem,"id")%>
<br />
message:<%#DataBinder.Eval(Container.DataItem,"message")%>
<br />
time:<%#DataBinder.Eval(Container.DataItem,"time")%>
<br />
</td>
</tr>
</SelectedItemtemplate>
</asp:DataList>
</form>
</body>
</html>
解决方案 »
- 问一句:.NET中的语言VB,C#,C++,J#有什么区别吗?
- 如何获取所有INPUT的值
- object.CLONE()是浅拷贝还是深拷贝?
- 布局问题???
- VS2008的调试功能不工作了。请帮忙看一下。
- 请教个session的问题
- 一个关于DataGrid的问题
- 网页中如何输入数理化公式、图表??
- 为什么我的ASPnetMenu的MenuItemSelected事件不响应阿
- 怎样将上传的图片生成一张缩略图?
- ****高分问题,关于html和asp.net*****
- 做过。NET的WEB服务器和虚拟主机的高手请看过来,100分提问,顶者有分,提出有价值意见者送50分,帮我解决问题者500分,第一次提问已结分
if(!Page.Isrback)
{}
Page.Isrback怎么写的我忘了可以看帮助
{
}
name 222 (选项2)
name 333
要重新bind()才行