PDA

View Full Version : سوال: SQL Server در VB.Net



ahwazcity
شنبه 08 خرداد 1389, 02:21 صبح
با سلام خدمت دوستان گرامی
من از این طریق به به بانک اطلاعاتی وصل شدم.

Public Class Form1
Dim Cn As New SqlClient.SqlConnection
Dim Comm As New SqlClient.SqlCommand
Dim Da As SqlClient.SqlDataAdapter
Dim Ds As DataSet
Dim SQL As String
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

'Attach a database file, located in the data directory, on connect to a local SQL Server Express instance
Cn.ConnectionString = "Server=.\SQLExpress;AttachDbFilename=|DataDirector y|Database1.mdf; Database=dbname;Trusted_Connection=Yes;"
Cn.Open()
SQL = "SELECT * FROM tbl_nam"
Da = New SqlClient.SqlDataAdapter(SQL, Cn)
Comm = New SqlClient.SqlCommand(SQL, Cn)
Da.SelectCommand = Comm
Ds = New DataSet()
Da.Fill(Ds, "tbl_nam")
DataGridView1.DataSource = Ds.Tables("tbl_nam")
'--------------------------------------------------------------------------


End Sub

End Class

همونطور که میبینید اطلاعات جدول بانک رو در DataGridView1 نمایش دادم میخواستم ببینم که چطور میتونم یک رکورد را حذف ،اضافه یا جستجو کنم.
یک سوال دیگه: وقتی که با کریستال ریپورت میخوام از یک جدول گزارش بگیرم اطلاعات موجود در جدول رو نمایش نمی دهد یک سری حروف و کلمات نامرتبط روی صفحه ظاهر می شود.
با تشکر

DoDoklak
شنبه 08 خرداد 1389, 09:13 صبح
دوست عزیز خیلی شلوغش کردی .دوبار اطلاعات رو خوندی تو برنامه های کاربردی و سنگین اصلا خوب نیست

کد رو اینجوری اصلاح کن



Public Class Form1


Dim Cn As New SqlClient.SqlConnection
Dim Comm As New SqlClient.SqlCommand
Dim DT As DataTable

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Cn.ConnectionString = "Server=.\SQLExpress;AttachDbFilename=|DataDirecto ry|Database1.mdf; Database=dbname;Trusted_Connection=Yes;"
Cn.Open()
Using CMD As New SqlClient.SqlCommand(“SELECT * FROM tbl_nam”, Cn)
DT.Load(CMD.ExecuteReader)
End Using

DataGridView1.DataSource = DT
End Sub

End Class


برای حذف و اضافه هم چندین روش وجود داره بستگی داره از کدوم بخوای استفاده کنی

kmotavali
شنبه 08 خرداد 1389, 10:41 صبح
با رشته sql مي توني جستجو كني يا ركوردي رو حذف كني .
جستجو : select * from tabelName where filedName like '%value%' d
حذف :Delete * from tableName where Value=Value

iran_sky
شنبه 08 خرداد 1389, 18:59 عصر
سلام دوست عزیز
یه نگاه به این برنامه بنداز شاید بدردت خورد
موفق باشی.....

http://persiandrive.com/996494

ahwazcity
شنبه 08 خرداد 1389, 21:58 عصر
سلام دوست عزیز اگه زحمتی نیست یک نمونه کد رو بزار البته اگه زحمتی نیست
با تشکر

Hossis
شنبه 08 خرداد 1389, 22:54 عصر
با سلام
اگه ميشه يک نمونه کد کامل بذاريد با يک رشته اسکيوال نمي‌شه توضيح داد.
اگه ممکنه کد کامل رو بذاريد دوستان گيج نشند

Hossis
شنبه 08 خرداد 1389, 22:57 عصر
آيا با اين دستورات که تو پست اول اومده،‌مي شه به بانک اکسس هم وصل شد؟؟

b.mahsa
شنبه 08 خرداد 1389, 23:16 عصر
دستورات تو بانک sql و access یکی . فقط باید به جای connectionstingsql از connection string acess استفاده کنید



cn.connectionstring="
Provider=Microsoft.Jet.OLEDB.4.0;Data Source="C:\dbname.mdb""

ashkan209
یک شنبه 09 خرداد 1389, 08:35 صبح
connection string رو همونجوری که دوستمون گفتند استفاده کنید و
بجای sql ها در تعریف command و ... خلاصه همه ابزارهای Ado از oledb استفاده کنید