rezasafdari
یک شنبه 29 مرداد 1385, 20:57 عصر
قصد دارم در این قسمت آموزش اتصال به بانک های اطلاعاتی اکسس و SQL رو آموزش بدم و امکانات و طریقه ی استفاده از اونها با اتصال به اکسس از طریق ADODB شروع میکنم
در این آموزش سعی کردم تا جایی که امکان داره از کلماتی استفاده کنم که برای همه قابل استفاده باشه :قلب:
برای فعال سازی کلاس ADODB در پروژه ی خود به طریقه ی زیر عمل کنید.
ابتدا از منوی Project گزینه ی References رو انتخاب کنید سپس در منوی باز شده به دنبال Microsoft ActiveX Data object 2.8 Library تیک بزنید و سپس Ok کنید.
سپس یک کامند باتون و یک دیتا گرید روی فرم خود بیندازید
برای فعال کردن شی دیتا گرید در پروژه مراحل زیر را انتخاب کنید :
کلید های ترکیبی Ctrl + T را فشار دهید تا منوی اضافه کردن کامپوننت ها باز شود در منوی باز شده بدنبال Microsoft DataGrid Control 6.0 (OLEDB) بگردید و این شی را انتخاب کرده (تیک زده )و OK کنید سپس یک شی به اشیا سمت چپ وی بی شما اضافه میشود .
پس از قرار دادن دیتا گرید و کامند باتون روی فرم خود روی فرم کلیک کنید تا وارد قسمت نوشتن کد شوید در قسمت جنرال(بالاترین جای این صفحه ) کد زیر را کپی پیست کنید :
Public cn As ADODB.Connection
Public cm As ADODB.Command
Public RS As ADODB.Recordset
و سپس در زیر آن این کد را کپی پیست کنید :
Private Sub Command1_Click()
Set cn = New ADODB.Connection
Set cm = New ADODB.Command
Set RS = New ADODB.Recordset
cn.ConnectionString = App.Path + "\Data\DBCreateTable.mdb"
cn.Provider = "Microsoft.jet.oledb.4.0"
cn.CursorLocation = adUseClient
cn.Open
cm.ActiveConnection = cn
cm.CommandType = adCmdText
cm.CommandText = "select * FROM rezasafdari"
RS.CursorType = adOpenStatic
RS.CursorLocation = adUseClient
Set RS = cm.Execute
Set Me.DataGrid1.DataSource = RS
DataGrid1.Refresh
End Sub
خوب مشخصه که باید به جای \Data\DBCreateTable.mdb آدرس بانک اطلاعاتی خود را وارد کنید
سپس در قسمت کد بجای rezasafdari نام تیبل بانک اطلاعاتی خود را وارد کنید بعد از آن کلید F5 را زده تا برنامه اجرا شود سپس روی کلید Command1 کلیک کنید به بانک وصل شدید !! آسون بود نه!!cm.CommandText = "select * FROM rezasafdari"
خوب اینم از اتصال بانک اطلاعاتی از طریق ADODB دفعه ی بعد از طریق ADODC رو میگم چون این دو روش از سریعترین روش ها برای دسترسی به بانک اطلاعاتی هستند...
مشکلی بود در همین قسمت مطرح کنید
یا علی:چشمک:
در این آموزش سعی کردم تا جایی که امکان داره از کلماتی استفاده کنم که برای همه قابل استفاده باشه :قلب:
برای فعال سازی کلاس ADODB در پروژه ی خود به طریقه ی زیر عمل کنید.
ابتدا از منوی Project گزینه ی References رو انتخاب کنید سپس در منوی باز شده به دنبال Microsoft ActiveX Data object 2.8 Library تیک بزنید و سپس Ok کنید.
سپس یک کامند باتون و یک دیتا گرید روی فرم خود بیندازید
برای فعال کردن شی دیتا گرید در پروژه مراحل زیر را انتخاب کنید :
کلید های ترکیبی Ctrl + T را فشار دهید تا منوی اضافه کردن کامپوننت ها باز شود در منوی باز شده بدنبال Microsoft DataGrid Control 6.0 (OLEDB) بگردید و این شی را انتخاب کرده (تیک زده )و OK کنید سپس یک شی به اشیا سمت چپ وی بی شما اضافه میشود .
پس از قرار دادن دیتا گرید و کامند باتون روی فرم خود روی فرم کلیک کنید تا وارد قسمت نوشتن کد شوید در قسمت جنرال(بالاترین جای این صفحه ) کد زیر را کپی پیست کنید :
Public cn As ADODB.Connection
Public cm As ADODB.Command
Public RS As ADODB.Recordset
و سپس در زیر آن این کد را کپی پیست کنید :
Private Sub Command1_Click()
Set cn = New ADODB.Connection
Set cm = New ADODB.Command
Set RS = New ADODB.Recordset
cn.ConnectionString = App.Path + "\Data\DBCreateTable.mdb"
cn.Provider = "Microsoft.jet.oledb.4.0"
cn.CursorLocation = adUseClient
cn.Open
cm.ActiveConnection = cn
cm.CommandType = adCmdText
cm.CommandText = "select * FROM rezasafdari"
RS.CursorType = adOpenStatic
RS.CursorLocation = adUseClient
Set RS = cm.Execute
Set Me.DataGrid1.DataSource = RS
DataGrid1.Refresh
End Sub
خوب مشخصه که باید به جای \Data\DBCreateTable.mdb آدرس بانک اطلاعاتی خود را وارد کنید
سپس در قسمت کد بجای rezasafdari نام تیبل بانک اطلاعاتی خود را وارد کنید بعد از آن کلید F5 را زده تا برنامه اجرا شود سپس روی کلید Command1 کلیک کنید به بانک وصل شدید !! آسون بود نه!!cm.CommandText = "select * FROM rezasafdari"
خوب اینم از اتصال بانک اطلاعاتی از طریق ADODB دفعه ی بعد از طریق ADODC رو میگم چون این دو روش از سریعترین روش ها برای دسترسی به بانک اطلاعاتی هستند...
مشکلی بود در همین قسمت مطرح کنید
یا علی:چشمک: