باز کردن فایل اکسل password دار

[miassus10]

با سلام
من وقتی میخوام یک فایل اکسل پسورد دار را از طریق کانکشن استرینگ با دستور زیر باز کنم نمیتونم
کسی میتونه کمکم کنه!


OleDbConnection1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=reports.xls;Extended Properties=Excel 8.0;Jet OLEDB:Database Password=1234"

[farazjoonam]

این یک نمونست . روش کار کن :


PublicFunction OpenConnect() As ADODB.Connection
Dim com AsObject
com = New ADODB.Command
Dim dbPath AsString
dbPath = VB6.GetPath & "\" & "House.mdb"
cnConnection = New ADODB.Connection
cnConnection = New ADODB.Connection
With cnConnection
.Open("Provider=Microsoft.Jet.OLEDB.4.0; Data source ='" & dbPath & "'; Jet OLEDB:database password=123")
EndWith
EndFunction

[miassus10]

منم دقیقا همینو نوشتم ولی جوابی نگرفتم!!!
کسی میتونه کمک کنه؟

[Amir_Sharif]

اکسل را نمیشه با این روش . این روش مال اکسسه!

[SMRAH1]

تا اونجایی که من میدونم فقط در حالتی که در اکسل یک provider table یا یک فضای نام (یعنی چند تا خونه رو به یک نام نامگداری کرده باشی) می تونی از طریق ODBC به اون دسترسی پیدا کنی.که مثلا این فضای نام معال همان Table در یک پایگاه داده است.
در حالت پسورد دار بودن هم در هنگام باز کردن (در Connection string) باید پسورد رو بدی.
مثال زیر یک Connection syring در VC است که کافیه به جای هر S% اون عبارت مورد نظرتو قرار بدی


"Driver=%s;Dbq=%s;Uid=%s;Pwd=%s;"