<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SqlClient" %>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<script language="VB" runat="server">
Sub Page_Load(Src As Object, E As EventArgs)
Dim DS As DataSet
Dim MyConnection As SQLConnection
Dim MyCommand As SQLDataSetCommand
MyConnection=New SQLConnection("server='127.0.0.1';uid=dugu;pwd=dugu;database=webemail")
MyCommand=New SQLDataSetCommand("select * from mailuser",MyConnection)
DS=new DataSet()
MyCommand.FillDataSet(ds,"mailuser")
MyDataGrid.DataSource=ds.Tables("mailuser").DefaultView
MyDataGrid.DataBind()
End Sub
</script>
<body><asp:datagrid id="MyDataGrid" runat="server"
Width="600" BackColor="#FFFFFF" ShowFooter="false" CellPadding="3"
CellSpacing="0" font-name="Verdana" Font-Size="8Pt" HeaderStyle-BackColor="#999933"
MaintainState="false"
/></body>
</html>
<%@ Import Namespace="System.Data.SqlClient" %>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<script language="VB" runat="server">
Sub Page_Load(Src As Object, E As EventArgs)
Dim DS As DataSet
Dim MyConnection As SQLConnection
Dim MyCommand As SQLDataSetCommand
MyConnection=New SQLConnection("server='127.0.0.1';uid=dugu;pwd=dugu;database=webemail")
MyCommand=New SQLDataSetCommand("select * from mailuser",MyConnection)
DS=new DataSet()
MyCommand.FillDataSet(ds,"mailuser")
MyDataGrid.DataSource=ds.Tables("mailuser").DefaultView
MyDataGrid.DataBind()
End Sub
</script>
<body><asp:datagrid id="MyDataGrid" runat="server"
Width="600" BackColor="#FFFFFF" ShowFooter="false" CellPadding="3"
CellSpacing="0" font-name="Verdana" Font-Size="8Pt" HeaderStyle-BackColor="#999933"
MaintainState="false"
/></body>
</html>
PageSize="8">
<Columns>
<asp:BoundColumn DataField="ymdhm" HeaderText="时间"></asp:BoundColumn>
<asp:BoundColumn DataField="sw" HeaderText="水位"></asp:BoundColumn>
</Columns>
<PagerStyle NextPageText="下一页" PrevPageText="上一页" HorizontalAlign="Right"></PagerStyle>
</asp:datagrid>
MyCommand =new SqlDataAdapter(("select * from mailuser",MyConnection)
说明: 在编译向该请求提供服务所需资源的过程中出现错误。请检查下列特定错误详细信息并适当地修改源代码。
编译器错误信息: BC30002: 未定义类型“SQLDataSetCommand”。
源错误:
行 11: Dim MyConnection As SQLConnection
行 12: 'Dim MyCommand as SqlDataAdapter
行 13: Dim MyCommand As SQLDataSetCommand
行 14: MyConnection=New SQLConnection("server='127.0.0.1';uid=dugu;pwd=dugu;database=webemail")
行 15: MyCommand=New SQLDataSetCommand("select * from mailuser",MyConnection)
该过的话提示这个地方有错误