ارتباط با بانك اطلاعاتي

[amie hossein]

سلام دوستان.
ميشه يكي به طور كامل ارتباط با بانك اطلاعاتي در vb رو برام بگه. با استفاده از دستورات SQL مثل select
در ضمن گشتم ولي پيدا نكردم.

[mehdidelphi]

با سلام
دوست عزیز از دستور select برای گرفتن اطلاعات از جداول بانک اطلاعاتی استفاده میشه نه برای ارتباط با بانک اطلاعاتی.برای ایجاد ارتباط با بانک اطلاعاتی Access از روش زیر می تونی استفاده کنی
1- ابتدا یک adodc به فرمت اضافه کن (برای اینکار اول باید مسیر project/components رو بری و بعد گزینه microsoft adodata controlرو تیک بزنی تا به جعبه ابزارت اضافه بشه بعد به فرمت اضافه کنی)
2- در پنجره properties گزینه خای زیر رو ست می کنی:
connectionstring=Provider=Microsoft.Jet.OLEDB.4.0; Data Source=address bank;Persist Security Info=False
commandtype=2
حالا می تونی با ست کردن datasource یک دیتاگرید اطلاعاتتو توی اون ببینی.
امیدوارم کمکت کرده باشم.

[amie hossein]

با سلام
دوست عزیز از دستور select برای گرفتن اطلاعات از جداول بانک اطلاعاتی استفاده میشه نه برای ارتباط با بانک اطلاعاتی.برای ایجاد ارتباط با بانک اطلاعاتی Access از روش زیر می تونی استفاده کنی
1- ابتدا یک adodc به فرمت اضافه کن (برای اینکار اول باید مسیر project/components رو بری و بعد گزینه microsoft adodata controlرو تیک بزنی تا به جعبه ابزارت اضافه بشه بعد به فرمت اضافه کنی)
2- در پنجره properties گزینه خای زیر رو ست می کنی:
connectionstring=Provider=Microsoft.Jet.OLEDB.4.0; Data Source=address bank;Persist Security Info=False
commandtype=2
حالا می تونی با ست کردن datasource یک دیتاگرید اطلاعاتتو توی اون ببینی.
امیدوارم کمکت کرده باشم.

سلام دوست عزيز
ممنون از راهنمايي
اين درست ولي من منظورم از select اين هست كه بتونم با اين دستور توي بانك اطلاعاتي search كنم و اطلاعات به دست آمده را تك تك توي يه چيزي مثل textbox بذارم.يعني مي خواهم يه sql query درست كنم.
اميدوارم كه تونسته باشم منظورم رو رسونده باشم.

[amie hossein]

سلام
اي بابا يكي جواب ما رو بده!!!

[majj]

شما بگو مشکلت تو سرچ بوسیله sql کامند هست یا نشون دادن نتایج جستجو تو تکست باکس؟
ولی این رو بگم که در بانکهای اطلاعاتی رابطهای و غیر رابطهای به خاطر وجود رکوردهای تکراری در بانک و عدم توانایی نمایش همه انها درموقع جستجودر یک تکست باکس به شکل کامل و شکیل ، از گریدها استفاده میشه

[amie hossein]

شما بگو مشکلت تو سرچ بوسیله sql کامند هست یا نشون دادن نتایج جستجو تو تکست باکس؟
ولی این رو بگم که در بانکهای اطلاعاتی رابطهای و غیر رابطهای به خاطر وجود رکوردهای تکراری در بانک و عدم توانایی نمایش همه انها درموقع جستجودر یک تکست باکس به شکل کامل و شکیل ، از گریدها استفاده میشه

سلام دوست عزيز
تقريبا مشكلم تو هر 2 تاشون هست
ولي بيشتر تو سرچ بوسيله دستورات sql است. اصلا دستورات وصل شدن به بانك اطلاعاتي و سرچ تو اونو نميدونم.تا اينجاشو فكر كنم درست باشه . نه؟؟؟
Dim cn As ADODB.Connection

Set cn = New ADODB.Connection

Dim rs As ADODB.Recordset


connstring = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\abolfazl\My Documents\test-vb\project1\db1.mdb;Mode=ReadWrite|Share Deny None;Persist Security Info=False"

cn.Open (connstring)

Set rs = New ADODB.Recordset
اما بعدش چي؟

[majj]

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

[mehdidelphi]

با سلام
دوست عزیز امیدوارم که مشکلتون حل شده باشه
کدی که دوستمون majj نوشتن در صورتی درسته که فیلد شما از نوع تکست باشه اما در مورد نوع عددی از کد زیر استفاده کنسد
Adodc4.RecordSource = "select * from mytable where tel='" & txt_search2
Set form0.DataGrid1.DataSource = Adodc4

[amie hossein]

سلام
آقا مشكل ما هنوز حل نشده!
خواهشا اگه ميشه يكي از اول روش جستجو در ديتابيس رو با استفاده از دستورات sqlquery و ..... به ما ياد بده ممنون ميشم.

[mehdidelphi]

با سلام
برای search کردن متن string از کد زیر استفاده کنید
"select * from tblcustomer where name='" & text1.text & "'"
برای search عدد از کد زیر استفاده کنید.
"select * from tblcustomer where name=" & text1.text