PDA

View Full Version : مشکل در ارتباط با بانک Sql



saeid taheri
یک شنبه 20 فروردین 1385, 19:13 عصر
سلام دوستان لطفا مرا کمک کنید
من نمی توانم با بانک Sql ارتباط برقرار نمایم
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.OleDb
Public Class Form1
Dim ds As New DataSet
Dim strSql As String
Dim strCon As String
Dim da As OleDbDataAdapter
Dim con As OleDbConnection
Dim newMode As Boolean
Dim newRow As DataRow
Dim cb As OleDbCommandBuilder
Private Sub empty()
TextRecord.Text = ""
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
TextBox4.Text = ""
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
newMode = False
strCon = "Provider=Microsoft.JET.OleDbConnection;Data Source=E:\Documents and Settings\110\My Documents\Visual Studio 2005\Projects\DataNew\DataNew\bin\Data1.mdf"
strSql = "Select * from stTable"
con = New OleDbConnection(strCon)
con.Open() // مشکل این قسمت است
da = New OleDbDataAdapter(strSql, con)
da.Fill(ds, "stTable")
TextBox1.DataBindings.Add(New Binding("Text", ds, "stTable.stNo"))
TextBox2.DataBindings.Add(New Binding("Text", ds, "stTable.Name"))
TextBox3.DataBindings.Add(New Binding("Text", ds, "stTable.Ave"))
TextBox4.DataBindings.Add(New Binding("Text", ds, "stTable.Unit"))
CheckBox1.DataBindings.Add(New Binding("Checked", ds, "stTable.Sex"))
con.Close()
End Sub
End Class

saeid taheri
دوشنبه 21 فروردین 1385, 10:56 صبح
آیا در بین اساتید کسی نیست به این سئوال پاسخ دهد؟

omid_Ahmadi
دوشنبه 21 فروردین 1385, 13:14 عصر
فکر کنم اگه با استفاده از تگ Code، کدتو یه جوری بنویسی که بشه خوندش شاید بشه یه کاریش کرد. ولی این کدی که الان نوشتی رو من یکی که حاضر نیستم بخونم

meh_secure
دوشنبه 21 فروردین 1385, 23:03 عصر
سلام دوستان لطفا مرا کمک کنید
من نمی توانم با بانک Sql ارتباط برقرار نمایم
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.OleDb
Public Class Form1
Dim ds As New DataSet
Dim strSql As String
Dim strCon As String
Dim da As OleDbDataAdapter
Dim con As OleDbConnection
Dim newMode As Boolean
Dim newRow As DataRow
Dim cb As OleDbCommandBuilder
Private Sub empty()
TextRecord.Text = ""
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
TextBox4.Text = ""
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
newMode = False
strCon = "Provider=Microsoft.JET.OleDbConnection;Data Source=E:\Documents and Settings\110\My Documents\Visual Studio 2005\Projects\DataNew\DataNew\bin\Data1.mdf"
strSql = "Select * from stTable"
con = New OleDbConnection(strCon)
con.Open() // مشکل این قسمت است
da = New OleDbDataAdapter(strSql, con)
da.Fill(ds, "stTable")
TextBox1.DataBindings.Add(New Binding("Text", ds, "stTable.stNo"))
TextBox2.DataBindings.Add(New Binding("Text", ds, "stTable.Name"))
TextBox3.DataBindings.Add(New Binding("Text", ds, "stTable.Ave"))
TextBox4.DataBindings.Add(New Binding("Text", ds, "stTable.Unit"))
CheckBox1.DataBindings.Add(New Binding("Checked", ds, "stTable.Sex"))
con.Close()
End Sub
End Class

meh_secure
دوشنبه 21 فروردین 1385, 23:06 عصر
برای ارتباط با بانک Sql فقط از کلاس SQL Client استفاده کنید. شما هردوی اینها رو با هم قاطی کردید. در ضمن دنبال Connection String مخصوص SQL برید.

zarrin_306
دوشنبه 21 فروردین 1385, 23:29 عصر
دوست عزیز کد نوشته شده در این تاپیک از خودتان نیست بلکه از از کتاب نوشته شده ی آقایانجعفر نژاد قمی وعباس نژاد میباشد
برای sql کتاب برنامه نویسی پایگاه داد ه با visualbasic.net انتشارات worx زا مطالعه ویا ado.net انتشارات ساحر را مطالعه کنید
در پناه حق

saeid taheri
سه شنبه 22 فروردین 1385, 22:23 عصر
آقای زرین شما فکر می کنید که کدی که خودتون می نویسید را خود شما اختراع کردید نه برادر شما هم این کد رو از روی یک کتاب کپی برداری کردید از راهنمایی شما متشکرم

meh_secure
سه شنبه 22 فروردین 1385, 22:50 عصر
کپی یا غیر کپی همین شکلی میشه. مشکلش رو بر طرف کنید.

samiraamiri
چهارشنبه 23 فروردین 1385, 14:05 عصر
سلام
شما اگه از vs2005 استفاده می کنید می تونید در بخش setting یه connection string تعریف کنید که خیلی راحت با استفاده از اون به بانکتون وصل بشید
ولی همونطور که دوستان گفتن شما sqlclient رو با oledb قاطی کردید
توی sqlclient نیاز نیست برای connection string تون ازProvider استفاده کنید
Dim myconnection As New SqlConnection("Server=(local);Database=Northwind;integrated security=True;")
لطفا" هر چی کد oledb هم نوشتید پاک کنید
امیدوارم جواب بگیرید

sweb
چهارشنبه 23 فروردین 1385, 17:42 عصر
من یه برنامه نویس آماتور هستم. در مورد پیاده سازی یک وب سایت asp.net و چگونگی ارتباط با بانک اطلاعاتی مثل sql یا access ، فقط از طریق کد نویسی منو راهنمایی کنید. خیلی ممنون...

samiraamiri
چهارشنبه 23 فروردین 1385, 22:01 عصر
خب شما اگه با asp.net کار می کنید بهتره سوالتون و در همون بخش بپرسید بهتر جواب می گیرید و البته اگه یه کم بگردید حتما" به نتیجه می رسید من این مبحث رو تو asp.net دیدم

M.kavyani
چهارشنبه 23 فروردین 1385, 22:55 عصر
من یه برنامه نویس آماتور هستم. در مورد پیاده سازی یک وب سایت asp.net و چگونگی ارتباط با بانک اطلاعاتی مثل sql یا access ، فقط از طریق کد نویسی منو راهنمایی کنید. خیلی ممنون...
اول جستجو کنید
در بخش مربوطه سوال رو مطر کنید
سوال رو در تاپیکی مناسب مطرح کنید

zarrin_306
پنج شنبه 24 فروردین 1385, 10:09 صبح
:تشویق: دوست عزیز من که توحین نکردم
فقط گفتم چنین کدی در فلان کتاب هست

با آرزوی موفقیت برای شما آقا سعید در اولین فرصت کدی توپ برات مینویسم
که خودت حال کنی:قلب:

ali_kolahdoozan
پنج شنبه 24 فروردین 1385, 11:13 صبح
ای بابا چرا همیشه توی تاپیکها دعوا میشه . حالا دوست من اگه کد می خواهید فقط بگید واسه asp.net می خواهید یا windows app من بهتون می دم

saeid taheri
پنج شنبه 24 فروردین 1385, 11:45 صبح
علی آقا من هیچ دعوایی با هیچ یک از اساتیدی که در این گروه فعالیت می کنند ندارم و مخلص همه آنها هم هستم فقط به آقای زرین می خواستم بگم که تمامی برنامه نویسان اول از این مرحله شروع به کار کردن من به جوابم رسیدم و از تمامی دوستان که برای من دلسوزی کردن ممنون هستم با تشکر از همه