修改成: <% @ Import Namespace="System.Data" %> <% @ Import Namespace="System.Data.SqlClient" %> <script langugue="VB" runat="server"> dim sqlstring as string ************************************* sqlstring="driver={sql server};server=my; uid=sa;pwd=119; database=reg" ********************************************* sqlCon = New SqlConnection(sqlstring) dim sql as string sql="select * from news"dim dr as SqlClient.SqlDataReader dim sqlcommand as new SqlClient.SqlCommand (sql,sqlcon ) dr=a.ExecuteReader do while dr.read response.write "<br>" & dr("id") loop </script>
<%@ Import Namespace="System.Data"%> <%@ Import Namespace="System.Data.SqlClient"%> <script language="vb" runat="server"> sub page_load(dim sender as Object,dim e as EventArgs) if (!IsPostBack)then Bind("") end if end sub sub Bind(String type) dim conStr as String dim cmd as String conStr="Data Source=sqlServer ip;user id=username;password=pass;initial catalog=database" dim conn as new SqlConnection(conStr) conn.Open() Cmd="select * from table" dim sda = new SqlDataAdapter(Cmd,conn) dim ds=new DataSet() sda.Fill(ds,"table") grid1.DataSource=ds.Tables["table"].DefaultView grid1.DataBind() conn.Close() end sub</script> <form runat="server"> <asp:DataGrid id=grid1 AllowPaging=true pagesize=15 allowsorting=true width="750" PagerStyle-Mode="NumericPages" OnPageindexChanged="ChangePage" runat ="server" /> </form>
<% @ Import Namespace="System.Data" %>
<% @ Import Namespace="System.Data.SqlClient" %>
<script langugue="VB" runat="server">
dim sqlstring as string
*************************************
sqlstring="driver={sql server};server=my; uid=sa;pwd=119; database=reg"
*********************************************
sqlCon = New SqlConnection(sqlstring)
dim sql as string
sql="select * from news"dim dr as SqlClient.SqlDataReader
dim sqlcommand as new SqlClient.SqlCommand (sql,sqlcon )
dr=a.ExecuteReader do while dr.read
response.write "<br>" & dr("id")
loop
</script>
win2000pro +iis+ .net 框架
没有vs.net
这与web.config 有关吗?
<%@ Import Namespace="System.Data.SqlClient"%>
<script language="c#" runat="server">
int startIndex;
void page_load(Object sender,EventArgs e){
if (!IsPostBack){
startIndex =0;
Bind("");
}}
void Bind(String type){
String conStr;
String Cmd;
conStr="Data Source=sqlServer ip;user id=username;password=pass;initial catalog=database";
SqlConnection conn = new SqlConnection(conStr);
conn.Open();
Cmd="select * from table";
SqlDataAdapter sda = new SqlDataAdapter(Cmd,conn);
DataSet ds=new DataSet();
sda.Fill(ds,"table");
grid1.DataSource=ds.Tables["table"].DefaultView;
grid1.DataBind();
conn.Close();
}</script>
<form runat="server">
<asp:DataGrid id=grid1
AllowPaging=true
pagesize=15
allowsorting=true
width="750"
PagerStyle-Mode="NumericPages"
OnPageindexChanged="ChangePage"
runat ="server"
/>
</form>
<%@ Import Namespace="System.Data.SqlClient"%>
<script language="vb" runat="server">
sub page_load(dim sender as Object,dim e as EventArgs)
if (!IsPostBack)then
Bind("")
end if
end sub
sub Bind(String type)
dim conStr as String
dim cmd as String
conStr="Data Source=sqlServer ip;user id=username;password=pass;initial catalog=database"
dim conn as new SqlConnection(conStr)
conn.Open()
Cmd="select * from table"
dim sda = new SqlDataAdapter(Cmd,conn)
dim ds=new DataSet()
sda.Fill(ds,"table")
grid1.DataSource=ds.Tables["table"].DefaultView
grid1.DataBind()
conn.Close()
end sub</script>
<form runat="server">
<asp:DataGrid id=grid1
AllowPaging=true
pagesize=15
allowsorting=true
width="750"
PagerStyle-Mode="NumericPages"
OnPageindexChanged="ChangePage"
runat ="server"
/>
</form>
谢谢。。等一下给你高分。。能不能再给我一个边接access2000的 谢谢!
另外这此边接与web.config 有关吗?
access连接字符串
记得引用名称空间的时候变成System.Data.OleDb