نحوه رجیستر کردن Access

[mohsenaria]

The 'Microsoft.Jet.OLEDB.4.0' provider is not registered on the local machine.

برنامه این ارور رو می ده لطفاً راهنمایی کنید.مرسی.

[sh2007]

احتمالا مشكل از office مي باشد يه بار اونو رمو و بعد نصب كن

[shahab2025]

احتمالا مشكل از office مي باشد يه بار اونو رمو و بعد نصب كن

:متعجب: تا جائيكه من ميدونم كانكت شدن به بانك اكسس نياز به برنامه اكسس هم نداره و روي يك كامپيوتري كه آفيس نداره هم كار ميكنه....

البته تغيراتي در ارتباط با بانك اكسس 2003 و 2007 هست


نحوه رجیستر کردن Access
The 'Microsoft.Jet.OLEDB.4.0' provider is not registered on the local machine.

برنامه این ارور رو می ده لطفاً راهنمایی کنید.مرسی.
دوست عزيز لطفاً بگو از 2003 استفاده ميكني يا 2007؟
اگر امكان داره كانكشنت رو هم بزار

[DoDoklak]

به احتمال زیاد یا از Windows 64 بیتی استفاده میکنی یا کلا سخت افزار سیستم 64 بیتی هستش

متاسفانه درایور access تو ویندوزهای 64 بیتی وجود نداره و فقط درایور SQL SERVER وجود داره
با نصب اکسس هم مشکل حل نمیشه

[pirmard]

The 'Microsoft.Jet.OLEDB.4.0' provider is not registered on the local machine.

برنامه این ارور رو می ده لطفاً راهنمایی کنید.مرسی.

حتی نیازی به نصب اکسس هم ندارید . می تونید خود مایکروسافت جت انجین رو نصب کنین فقط .

[mohsenaria]

احتمالا مشكل از office مي باشد يه بار اونو رمو و بعد نصب كن



من افیس 2007 نصب کردم.فک نکنم مشکل از افیس باشه اخه قبلاً جواب می داد.

[mohsenaria]

:متعجب: تا جائيكه من ميدونم كانكت شدن به بانك اكسس نياز به برنامه اكسس هم نداره و روي يك كامپيوتري كه آفيس نداره هم كار ميكنه....

البته تغيراتي در ارتباط با بانك اكسس 2003 و 2007 هست


دوست عزيز لطفاً بگو از 2003 استفاده ميكني يا 2007؟
اگر امكان داره كانكشنت رو هم بزار


افیس 2007
windows 7 64bit ultimate

[mohsenaria]

حتی نیازی به نصب اکسس هم ندارید . می تونید خود مایکروسافت جت انجین رو نصب کنین فقط .


من می خام برنامم portable باشه یعنی در حد امکان نخاد چیزی رو نصب کنی.اگه می شه لطفاً راهنمایی کنید. مرسی.

[Reza Safa]

به اين تايپيک برو اميدوارم بدردت بخوره

http://barnamenevis.org/forum/showpost.php?p=849128&postcount=2

[mohsenaria]

به اين تايپيک برو اميدوارم بدردت بخوره

http://barnamenevis.org/forum/showpost.php?p=849128&postcount=2


این صفحه باز می شه.

آدرس مورد نظر وجود ندارد.
علت :
1-آدرس را اشتباه تایپ کرده اید.
2-این صفحه توسط مدیر سایت حذف شده است.
3- هنگام ایجاد گفتگوی جدید از عناوین نامناسب استفاده شده است.

[Reza Safa]

این صفحه باز می شه.

آدرس مورد نظر وجود ندارد.
علت :
1-آدرس را اشتباه تایپ کرده اید.
2-این صفحه توسط مدیر سایت حذف شده است.
3- هنگام ایجاد گفتگوی جدید از عناوین نامناسب استفاده شده است.

لينک رو حذف کردن

این کرنل خیلی قوی و پر کارامد است. خودم طراحی کردم. به کمک این کد می توانید فقط دستورات اس کیو ال را وارد نمایید .





Imports System.Data
Imports System.Data.OleDb
Imports System.Environment
Imports System.Globalization
Imports Microsoft.VisualBasic.FileSystem
Public Class cDLL
Public Fn As Integer = FreeFile()
'----
Public ComBuild As New OleDbCommandBuilder 'Build Command For Database
Public Con As New OleDbConnection 'Connection to Database
Public Com As New OleDbCommand 'Command For Database
Public dAdapter As New OleDbDataAdapter 'Data Adapter
Public dReader As OleDbDataReader 'Serach & Read From Database
Public dSet As New DataSet 'Data Set


Public Sub DisplayOleDbErrorCollection(ByVal myException As OleDbException)
Dim i As Integer
For i = 0 To myException.Errors.Count - 1
MessageBox.Show("Index #" + i.ToString() + ControlChars.Cr _
+ "Message: " + myException.Errors(i).Message + ControlChars.Cr _
+ "Native: " + myException.Errors(i).NativeError.ToString() + ControlChars.Cr _
+ "Source: " + myException.Errors(i).Source + ControlChars.Cr _
+ "SQL: " + myException.Errors(i).SQLState + ControlChars.Cr, "", MessageBoxButtons.OK, MessageBoxIcon.Error)
Next i
End Sub
Public Sub Connection(ByVal constring As String)
Con.Close()
'----
Try
Con.ConnectionString = constring
Con.Open()
Catch ex As Exception
MessageBox.Show(ex.Source + vbCrLf + ex.Message)
Application.Exit()
End Try
End Sub
Public Sub Command(ByVal sqlCommand As String, ByVal TableName As String)
Try
Connection(pdp)
dSet.Clear()
'----
Com.Connection = Con
Com.CommandText = sqlCommand
'----
dAdapter.SelectCommand = Com

dAdapter.Fill(dSet, TableName)
Catch ex As Exception
MessageBox.Show(ex.Source + vbCrLf + ex.Message)
End Try
End Sub
Public Sub ExecuteCommand(ByVal SelectCommmand As String, ByVal sqlCommand As String, ByVal TableName As String)
Try
dSet.Clear()
'----
Connection(pdp)
Command(SelectCommmand, TableName)


Com.Connection = Con
Com.CommandText = sqlCommand

'MsgBox(sqlCommand)

Com.ExecuteReader()

dAdapter.Update(dSet, TableName)
Catch ex As Exception
MessageBox.Show(ex.Source + vbCrLf + ex.Message)
End Try

End Sub
Public Function Get_ExecuteCommand(ByVal SelectCommmand As String, ByVal sqlCommand As String, ByVal TableName As String) As String
Try
dSet.Clear()
'----
Connection(pdp)
Command(SelectCommmand, TableName)


Com.Connection = Con
Com.CommandText = sqlCommand

'MsgBox(sqlCommand)
Dim strVal As String = ""

If Com.ExecuteScalar Is DBNull.Value Then
strVal = "0"
Else
strVal = Com.ExecuteScalar
End If

dAdapter.Update(dSet, TableName)


Return strVal
Catch ex As Exception
MessageBox.Show(ex.Source + vbCrLf + ex.Message)
End Try

End Function
End Class

[shahab2025]

لينک رو حذف کردن

این کرنل خیلی قوی و پر کارامد است. خودم طراحی کردم. به کمک این کد می توانید فقط دستورات اس کیو ال را وارد نمایید .





Imports System.Data
Imports System.Data.OleDb
Imports System.Environment
Imports System.Globalization
Imports Microsoft.VisualBasic.FileSystem
Public Class cDLL
Public Fn As Integer = FreeFile()
'----
Public ComBuild As New OleDbCommandBuilder 'Build Command For Database
Public Con As New OleDbConnection 'Connection to Database
Public Com As New OleDbCommand 'Command For Database
Public dAdapter As New OleDbDataAdapter 'Data Adapter
Public dReader As OleDbDataReader 'Serach & Read From Database
Public dSet As New DataSet 'Data Set


Public Sub DisplayOleDbErrorCollection(ByVal myException As OleDbException)
Dim i As Integer
For i = 0 To myException.Errors.Count - 1
MessageBox.Show("Index #" + i.ToString() + ControlChars.Cr _
+ "Message: " + myException.Errors(i).Message + ControlChars.Cr _
+ "Native: " + myException.Errors(i).NativeError.ToString() + ControlChars.Cr _
+ "Source: " + myException.Errors(i).Source + ControlChars.Cr _
+ "SQL: " + myException.Errors(i).SQLState + ControlChars.Cr, "", MessageBoxButtons.OK, MessageBoxIcon.Error)
Next i
End Sub
Public Sub Connection(ByVal constring As String)
Con.Close()
'----
Try
Con.ConnectionString = constring
Con.Open()
Catch ex As Exception
MessageBox.Show(ex.Source + vbCrLf + ex.Message)
Application.Exit()
End Try
End Sub
Public Sub Command(ByVal sqlCommand As String, ByVal TableName As String)
Try
Connection(pdp)
dSet.Clear()
'----
Com.Connection = Con
Com.CommandText = sqlCommand
'----
dAdapter.SelectCommand = Com

dAdapter.Fill(dSet, TableName)
Catch ex As Exception
MessageBox.Show(ex.Source + vbCrLf + ex.Message)
End Try
End Sub
Public Sub ExecuteCommand(ByVal SelectCommmand As String, ByVal sqlCommand As String, ByVal TableName As String)
Try
dSet.Clear()
'----
Connection(pdp)
Command(SelectCommmand, TableName)


Com.Connection = Con
Com.CommandText = sqlCommand

'MsgBox(sqlCommand)

Com.ExecuteReader()

dAdapter.Update(dSet, TableName)
Catch ex As Exception
MessageBox.Show(ex.Source + vbCrLf + ex.Message)
End Try

End Sub
Public Function Get_ExecuteCommand(ByVal SelectCommmand As String, ByVal sqlCommand As String, ByVal TableName As String) As String
Try
dSet.Clear()
'----
Connection(pdp)
Command(SelectCommmand, TableName)


Com.Connection = Con
Com.CommandText = sqlCommand

'MsgBox(sqlCommand)
Dim strVal As String = ""

If Com.ExecuteScalar Is DBNull.Value Then
strVal = "0"
Else
strVal = Com.ExecuteScalar
End If

dAdapter.Update(dSet, TableName)


Return strVal
Catch ex As Exception
MessageBox.Show(ex.Source + vbCrLf + ex.Message)
End Try

End Function
End Class




ميگي چطوري كار ميكنه؟؟

[davoodi]

من هم همین مشکل رو دارم و دقیقاً همین پیغام خطا.
کسی میدونه چطور میشه حلش کرد؟

[Hossis]

مشکل در نوع کانکشن در بانک اکسس 2007 هست که با اکسس 2003 فرق داره
در اکسس 2003 به همون صورتی هست که شما نوشتید اما
در اکسس 2007 به این صورت هست


db.Provider = "Microsoft.ACE.OLEDB.12.0"

[DoDoklak]

مشکل در نوع کانکشن در بانک اکسس 2007 هست که با اکسس 2003 فرق داره
در اکسس 2003 به همون صورتی هست که شما نوشتید اما
در اکسس 2007 به این صورت هست

کد:
db.Provider = "Microsoft.ACE.OLEDB.12.0"


این مطلب شما اصلا ربطی به موضوع نداره مشکل از کانکشن نیست دوست عزیز
شما با آفیس 2003 هم همین مشکل رو داری و حتی با آفیس 2007 و با همین کانکشنی که گذاشتید مشکل حل نمیشه

مشکل از نبودن درایور برای سیستمهای 64 بیتی است

[@AM!R!]

دوستان سلام
این بحث رو تازه پیدا کردم چون حالا که یه برنامه تو win32 نوشتم و برنامه نصب رو تو یه سیستم با win64 نصب می کنم ، با این پیغام مواجه می شم
بعد از گذشت حدود دو سال از طرح این مشکل آیا هنوز راه حلی برای آن پیدا نشده؟

[@AM!R!]

کسی از دوستان نظری نداره؟

یعنی سیستم عامل دستگاه مقصد باید از 64bit به 32bit تغییر کنه؟

یعنی سیستم عامل دستگاه من باید از 32bit به 64bit تغییر کنه و فرآیند ساخت پروژه و ستاپ در یک سیستم با win64 انجام بشه؟

آیا در زمان ساخت setup توی همون محیط VS.NET روشی برای حل این مشکل هست؟

آیا باید از InstallShild و یا محصولات مشابه استفاده کرد؟

[Mani_rf]

دوست عزیز، نسخه 64 بیت jet.oledb4 روی سیستمی که اجرا میکنی نصب نشده، کافیه او نرو نصب کنی تا مشکلت حل بشه.
از این آدرس (http://support.microsoft.com/kb/239114/en-us)می تونی اون را دانلود کنی و مشکلت را حل کنی؛ توضیحات مفیدی هم درباره این مسئله داده شده که حتما کمکت خواهد کرد.

[@AM!R!]

این نسخه 4.0.8015.0 از فایل Msjet40.dll یعنی همون "Service Pack 8" از کجا گیر میاد ظاهراً چاره مشکل ما فقط همین نسخه هست!!!؟؟

سیستم عامل سیستم مقصد vista 64bit هست

توی این صفحه ای که زحمت کشیدین و لینک آوردین ، دانلود نمی شه!!!

[@AM!R!]

حالا بعد از دانلود، چطوری میشه جایگزینش کرد با فایلی که قبلا با همین نام تو مسیر Windows\SysWOW64 وجود داره؟

مگه ویندوز به این راحتی میزاره؟؟!!

[@AM!R!]

کسی از دوستان نظری نداره؟