Show Bid Request
Connecting to locked Access DB
Bid Request Id: 6458
|
|
|
Description:
I am stuck in my VB6 program that connects across a network to an Access 2000 database. The connection works fine when the DB is unlocked, but I want to add some protection by locking the database with a password that will be hardcoded into my app.
I don't need user/password protection, just the overall database password.
The problem is related to the connection string. I want to find away to add the password to the connection string and have it work with both a DAO and an ADO connections (I use both, as well as a number of controls, throughout the program).
I am also hoping, in finding somebody capable of doing this, to set up a longer relationship to help with a number of other problems as I develop this application. Thanks a lot!
Deliverables:
Working VB6 example that I can incorporate into my code. Complete copyrights to all work purchased.
Remember that contacting the other party outside of the site (by email, phone, etc.) on all business projects < $500 (before the buyer's money is escrowed) is a violation of both the software buyer and seller agreements.
We monitor all site activity for such violations and can instantly expel transgressers on the spot, so we thank you in advance for your cooperation.
If you notice a violation please help out the site and report it. Thanks for your help.
|
|
|
Bidding/Comments:
|
All monetary amounts on the site are in United States dollars.
Rent a Coder is a closed auction, so coders can only see their own bids and comments. Buyers can view every posting made on their bid requests. |
See all rejected bids (and all comments)
| Name |
Bid Amount
|
Date |
Coder Rating |
|
|
This bid was accepted by the buyer!
|
$5 (USD)
|
Dec 13, 2001
1:52:46 PM EDT
|
10
(Excellent)
|
|
|
| Password Protected
Dim MyConn As New ADODB.Connection
MyConn.Provider = 'Microsoft.Jet.OLEDB.4.0'
MyConn.Properties('Data Source') = 'C:\...\JetPassword.MDB'
MyConn.Properties('Jet OLEDB:Database Password') = 'MyPwd'
MyConn.Open
Jet Security Dim MyConn As New ADODB.Connection
MyConn.Provider = 'Microsoft.Jet.OLEDB.4.0'
MyConn.Properties('Data Source') = 'C:\...\JetSecurity.MDB'
MyConn.Properties('Jet OLEDB:System database') = 'C:\...\System.MDW'
MyConn.Open UserID:='Admin', Password:='MyPw
This information can be found at http://support.microsoft.com/default.aspx?scid=kb;EN-US;q191754
All the information is there for what you need to do. Accept my bid if this is the information you need. I'd be willing to help in the future as well. |
|
|
|
|
|
|
