初学都求连接数据库代码！（vb.net)

Question

就是只有一个变量，更新一个字断，查找ID如以下ASP代码
<%
set conn=server.createobject("adodb.connection")
conn.open "................"
set rs=server.createobject("adodb.recordset")
sql="select * from class1 where id=1"
rs.open sql,conn,1,3
name1="天花板"
rs("name")=name1
%>

Answer 1

conn.Open "Driver={Microsoft Access Driver (*.mdb)};Dbq=" & Server.MapPath("data.mdb")
or
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("data.mdb")

Answer 2

上面的是ASP的
ASP.NET(VB.NET)
Dim connectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Server.MapPath("data.mdb") 
 Dim conn As OleDbConnection = New OleDbConnection(connectionString) 
 Dim cmd As OleDbCommand = New OleDbCommand("Update class1 Set [name] = 'test' where ID = 1", conn) 
 conn.Open 
 cmd.ExecuteNonQuery 
 conn.Close

Answer 3

上面的是ASP的
ASP.NET(C#)
 String conn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Server.MapPath("data.mdb") ;
 OleDbConnection  con= New OleDbConnection(conn) ;
  String comm="Update class1 Set [name] = 'test' where ID = 1";
 OleDbCommand comm = New OleDbCommand(comm, conn);
 conn.Open ();
 cmd.ExecuteNonQuery() ;
 conn.Close();

Answer 4

LaoDai_Net(『老代.Net』) 大哥！偶不想用Update 这种形式有没有select .......rs("name")=name1
这种形式的，还有偶用的是SQL2000，上面好象是 Access ！谢谢了！

Answer 5

给年SQL Server的连接方法：String conn = "Provider=SQLOLEDB.1;Persist Security Info=True;User ID=sa;Password=sa;Initial Catalog=Northwind;Data Source=localhost;"
SQLDbConnection  con= New SQLDbConnection (conn) ;
String comm="Update class1 Set [name] = 'test' where ID = 1";
 SQLDbCommand comm = New SQLDbCommand(comm, conn);
 conn.Open ();
 cmd.ExecuteNonQuery() ;
 conn.Close();

Answer 6

查询的String conn = "Provider=SQLOLEDB.1;Persist Security Info=True;User ID=sa;Password=sa;Initial Catalog=Northwind;Data Source=localhost;"
SQLDbConnection  con= New SQLDbConnection (conn) ;
String comm="select * from class1 where id=1";
 SQLDbCommand comm = New SQLDbCommand(comm, conn);
 conn.Open ();
 cmd.ExecuteNonQuery() ;
 conn.Close();

Answer 7

定义大多数数据库操作的类
public class myData
{
//设置Conn用来连接数据库，["MC"]是从Web.config文件最后几行的 key="MC" 里取出来的
SqlConnection Conn=new SqlConnection(ConfigurationSettings.AppSettings["MC"]);
//打开数据库连接
public void OpenConn()
{
Conn.Open();
}
//查询数据库，返回SqlDataReader，只读
public SqlDataReader executeQuery(string sql)
{
SqlCommand myCommand=new SqlCommand(sql,Conn);
SqlDataReader myReader = myCommand.ExecuteReader();
return  myReader;
}
//查询数据库，返回结果DataTable以供查询
public DataTable executeDataTable(string sql)
{
DataSet ds=new DataSet();
SqlDataAdapter Adapter=new SqlDataAdapter(sql,Conn);
Adapter.Fill(ds,"myTable");
return ds.Tables["myTable"];
}
//查询数据库，将数据填充到DataTable备用
public DataTable FillDataTable(string sql)
{
DataTable dt=new DataTable();
SqlDataAdapter Adapter=new SqlDataAdapter(sql,Conn);
Adapter.Fill(dt);
return dt;
}
//下面定义了一个查询数据库并且返回数据视图给DataGrid控件用的函数executeDataView
public DataView executeDataView(string sql)
{
DataSet ds=new DataSet();
SqlDataAdapter Adapter=new SqlDataAdapter(sql,Conn);
Adapter.Fill(ds,"myTable");
return ds.Tables["myTable"].DefaultView;
}
//下面定义一个数据库插入和修改操作的函数
public void executeUpdate(string sql)//定义数据库插入和修改操作
{
SqlCommand cmd = new SqlCommand(sql,Conn);
cmd.Connection.Open();
cmd.ExecuteNonQuery();
cmd.Connection.Close();
}
//关闭数据库连接
public void closeConn()
{
Conn.Close();
}
}

Answer 8

Imports system.Data
Imports system.Data.OledbDim conn as new oledbconnection("Provider=Microsoft.Jet.Oledb.4.0;Data Source=" & Serer.MapPath("DataBase.Mdb"))
conn.open()
Dim comm as new OledbCommand("select * from class1 where id=1",conn)
Dim dr as oledbdatareader=comm.executereader()
while dr.read()
Response.write(dr("数据库表字段"))
end while
dr.close()
conn.close()

Answer 9

不好意思，没注意看你的代码，你可以这样写：
Imports system.Data
Imports system.Data.SqlClient'导入数据库命名空间．Dim conn as new sqlconnection("Server=Localhost;uid=sa;pwd=;database=yourdatabase")
conn.Open()
Dim comm as new sqlcommand("Update class1 Set [name] = 'nam1' where ID = 1",conn)
comm.executeNonquery()
dr.close()
conn.close()

Answer 10

Standard Security:"Driver={SQL Server};Server=Aron1;Database=pubs;Uid=sa;Pwd=asdasd;"  Trusted connection:"Driver={SQL Server};Server=Aron1;Database=pubs;Trusted_Connection=yes;" 

Answer 11

大哥　你搞什么飞机啊？你的代码是asp的吧？
Dim connectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Server.MapPath("data.mdb") 
 Dim conn As OleDbConnection = New OleDbConnection(connectionString) 
 Dim cmd As OleDbCommand = New OleDbCommand("Update class1 Set [name] = 'test' where ID = 1", conn) 
 conn.Open 
 cmd.ExecuteNonQuery 
 conn.Close

Answer 12

.net不能象这句这样直接
rs("name")=name1
然后再：
rs.update 吗？

Answer 13

我买了一个 便宜的 asp.net空间！才50元！高兴！给分！！
100mb 的！可以做论坛！才 50元！！速度飞快！
www.hi876.com 你们看看