Diễn đàn    Window Form programming    Lập trình với access khó phết

Thành viênTrả lời
coder

lap trinh khong bien gioi
144  bài
21-4-2009 22:38:16
bình thường thì thế này,

"Insert Into Contacts (FirstName, LastName) Values (@FirstName, @LastName)"

Nhưng với access phải chuyển thành

INSERT

[C#]

string ConnString = Utils.GetConnString();

string SqlString = "Insert Into Contacts (FirstName, LastName) Values (?,?)";

using (OleDbConnection conn = new OleDbConnection(ConnString))

{

using (OleDbCommand cmd = new OleDbCommand(SqlString, conn))

{

cmd.CommandType = CommandType.Text;

cmd.Parameters.AddWithValue("FirstName", txtFirstName.Text);

cmd.Parameters.AddWithValue("LastName", txtLastName.Text);

conn.Open();

cmd.ExecuteNonQuery();

}

}



[VB]

Dim ConnString As String = Utils.GetConnString()

Dim SqlString As String = "Insert Into Contacts (FirstName, LastName) Values (?,?)"

Using conn As New OleDbConnection(ConnString)

Using cmd As New OleDbCommand(SqlString, conn)

cmd.CommandType = CommandType.Text

cmd.Parameters.AddWithValue("FirstName", txtFirstName.Text)

cmd.Parameters.AddWithValue("LastName", txtLastName.Text)

conn.Open()

cmd.ExecuteNonQuery()

End Using

End Using


UPDATE

[C#]

string ConnString = Utils.GetConnString();

string SqlString = "Update Contacts Set FirstName = ?, LastName = ?";

using (OleDbConnection conn = new OleDbConnection(ConnString))

{

using (OleDbCommand cmd = new OleDbCommand(SqlString, conn))

{

cmd.CommandType = CommandType.Text;

cmd.Parameters.AddWithValue("FirstName", txtFirstName.Text);

cmd.Parameters.AddWithValue("LastName", txtLastName.Text);

conn.Open();

cmd.ExecuteNonQuery();

}

}



[VB]

Dim ConnString As String = Utils.GetConnString()

Dim SqlString As String = "Update Contacts Set FirstName = ?, LastName = ?"

Using conn As New OleDbConnection(ConnString)

Using cmd As New OleDbCommand(SqlString, conn)

cmd.CommandType = CommandType.Text

cmd.Parameters.AddWithValue("FirstName", txtFirstName.Text)

cmd.Parameters.AddWithValue("LastName", txtLastName.Text)

conn.Open()

cmd.ExecuteNonQuery()

End Using

End Using


DELETE

[C#]

string ConnString = Utils.GetConnString();

string SqlString = "Delete * From Contacts Where FirstName = ? And LastName = ?";

using (OleDbConnection conn = new OleDbConnection(ConnString))

{

using (OleDbCommand cmd = new OleDbCommand(SqlString, conn))

{

cmd.CommandType = CommandType.Text;

cmd.Parameters.AddWithValue("FirstName", txtFirstName.Text);

cmd.Parameters.AddWithValue("LastName", txtLastName.Text);

conn.Open();

cmd.ExecuteNonQuery();

}

}



[VB]

Dim ConnString As String = Utils.GetConnString()

Dim SqlString As String = "Delete * From Contacts Where FirstName = ? And LastName = ?"

Using conn As New OleDbConnection(ConnString)

Using cmd As New OleDbCommand(SqlString, conn)

cmd.CommandType = CommandType.Text

cmd.Parameters.AddWithValue("FirstName", txtFirstName.Text)

cmd.Parameters.AddWithValue("LastName", txtLastName.Text)

conn.Open()

cmd.ExecuteNonQuery()

End Using

End Using


SELECT

[C#]

string ConnString = Utils.GetConnString();

string SqlString = "Select * From Contacts Where FirstName = ? And LastName = ?";

using (OleDbConnection conn = new OleDbConnection(ConnString))

{

using (OleDbCommand cmd = new OleDbCommand(SqlString, conn))

{

cmd.CommandType = CommandType.Text;

cmd.Parameters.AddWithValue("FirstName", txtFirstName.Text);

cmd.Parameters.AddWithValue("LastName", txtLastName.Text);



conn.Open();

using (OleDbDataReader reader = cmd.ExecuteReader())

{

while (reader.Read())

{

Response.Write(reader["FirstName"].ToString() + " " + reader["LastName"].ToString());

}

}

}

}



[VB]

Dim ConnString As String = Utils.GetConnString()

Dim SqlString As String = "Select * From Contacts Where FirstName = ? And LastName = ?"

Using conn As New OleDbConnection(ConnString)

Using cmd As New OleDbCommand(SqlString, conn)

cmd.CommandType = CommandType.Text

cmd.Parameters.AddWithValue("FirstName", txtFirstName.Text)

cmd.Parameters.AddWithValue("LastName", txtLastName.Text)

conn.Open()

Using reader As OleDbDataReader = cmd.ExecuteReader()

While reader.Read()

Response.Write(reader("FirstName").ToString() + " " + reader("LastName").ToString())

End While

End Using

End Using

End Using
 
tctit


1  bài
10-5-2013 15:20:34
Bạn ơi cho mình hỏi?
Hàm string ConnString = Utils.GetConnString();
nó báo lỗi Utils mình phải khai báo thư viện nào bạn?
 

Chủ đề gần đây :

Cùng loại :

Tên file Mô tả chi tiết Ngày
NWeb.zip (1) Module đơn giản Newsweb trên Dotnetnuke v10.x.x.x10/18/2025 8:08:11 AM
vspforum.zip (11) Ma nguon vspforum ngay xua4/18/2023 6:38:37 AM
pdfjs.rar (2) pdfjs 2017 : hiển thị tốt trên iphone 11, 12, 13 không lỗi, bản 2012 sẽ lỗi trên iphone6/21/2022 11:52:48 AM
pdfjs2.rar (2) Xem file pdf bằng viewer.hml cua pdfjs (thư viện chuẩn mozilla) 2012. https://mozilla.github.io/pdf.js/getting_started/#download có thể download bản prebuild tại đây6/21/2022 11:52:04 AM
runner.zip (0) using three.js, orbitcontrol to view an object move random on map. Di chuyển 1 đồ vật ngẫu nhiên trên bản đồ, sử dụng với demo nhân viên di chuyển trong văn phòng. Toàn js download về là chạy12/5/2019 5:55:14 PM
gmap.zip (1) google map + marker7/17/2019 2:25:05 PM
vinsmarthomeservice.zip (1) java post json to api, use AsyncTask, event listener7/9/2019 5:00:10 PM
fblogin.zip (0) Login facebook bang javascript SDK7/9/2019 9:16:37 AM
autocomplete-location.zip (2) autocomplete location geo from google place, html + js7/4/2019 4:37:55 PM
WebAPI.zip (8) api for android access db (v1.0.0)7/4/2019 9:14:17 AM