Ad:

Visual Basic 4 / 5 / 6 Discussion Thread
Marked Solved
Views: 7504

Aug 20th, 2007

changing ms access database path during runtime

Expand Post »

hi everybody,

my connection code is like this:

Set conn = New ADODB.Connection

With conn
.ConnectionString = "Provider = Microsoft.JET.OLEDB.4.0; data source = C:\Documents and Settings\kullaniciadi\Desktop\reservation97.mdb; persist security info = false"
.Open
End With

This database (reservation97.mdb) is going to be moved to a server.. How is going to be the path string then? (e.i. \\server\foldername...) ??

And to change the path by an admin when program starts, what should I add to source code? thanx...

Similar Threads

I need help for connecting to Ms access database in VB.NET
Create an Access Database using Java in Java
VB: Connect to Access database via ODBC datasource name in Visual Basic 4 / 5 / 6
Set runtime connection to the Access database for Crystal report in VB.NET
Writing to an Access Database in Visual Basic 4 / 5 / 6

t_yalthis

Reputation Points: 10

Solved Threads: 0

Newbie Poster

Offline

22 posts
since Jul 2007

Permalink

Aug 20th, 2007

Re: changing ms access database path during runtime

Hi,

Yes it should be "\\ServerSharedFolderName\reservation97.mdb"

Note here, the Sahred Folder in Server Name Should Have Complete Read/Write Access..

Regards
Veena

QVeen72

Reputation Points: 84

Solved Threads: 140

Posting Shark

Offline

923 posts
since Nov 2006

Permalink

Aug 20th, 2007

Re: changing ms access database path during runtime

Thanx Veena,
and secondly, how can I change the path during runtime?

t_yalthis

Reputation Points: 10

Solved Threads: 0

Newbie Poster

Offline

22 posts
since Jul 2007

Permalink

Aug 20th, 2007

Re: changing ms access database path during runtime

Hi,

Just change the datasource property in ConnString:

Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text)
With conn
.ConnectionString = "Provider = Microsoft.JET.OLEDB.4.0; data source = <a rel="nofollow" href="file://\\SharedFolderName\reservation97.mdb" target="_blank">\\SharedFolderName\reservation97.mdb</a>; persist security info = false"
.Open
End With
With conn
.ConnectionString = "Provider = Microsoft.JET.OLEDB.4.0; data source = <a rel="nofollow" href="file://\\SharedFolderName\reservation97.mdb" target="_blank">\\SharedFolderName\reservation97.mdb</a>; persist security info = false"
.Open
End With

Regards
Veena

QVeen72

Reputation Points: 84

Solved Threads: 140

Posting Shark

Offline

923 posts
since Nov 2006

Permalink

Aug 20th, 2007

Re: changing ms access database path during runtime

yeah I now how to change it; but I think I couldn't explain very well..
admin is going to install the program, and he will want to change the path of the database. is there anyway to change it without writing the code as you explained above, compile it, create the .exe and setup file again?

otherwise it is simple to change it while coding..

thanx for the patiance btw

t_yalthis

Reputation Points: 10

Solved Threads: 0

Newbie Poster

Offline

22 posts
since Jul 2007

Permalink

Aug 20th, 2007

Re: changing ms access database path during runtime

Hi,

Always, in RealTime Projects what we do is Save the Databasepath in an Initialization Text File or another Password protected Database mdb file. So, Open the Textfile, Read the Path and close it, not open the Database with the new path. Disadvantage of this TextFile is, anybody can browse and find the Path, and they may tamper its text data. Always, its a Good Option to Query from a Small Another mdb file and always save it in Current Folder Location. Even if somebody tries to open it, it is Password protected, and cannot Tamper with its Data..
I Hope I'am clear.

Regards
Veena

QVeen72

Reputation Points: 84

Solved Threads: 140

Posting Shark

Offline

923 posts
since Nov 2006

Permalink

Aug 20th, 2007

Re: changing ms access database path during runtime

Yeah that's what I was asking. thank you a lot veena, really..

t_yalthis

Reputation Points: 10

Solved Threads: 0

Newbie Poster

Offline

22 posts
since Jul 2007

Permalink

Mar 7th, 2008

Re: changing ms access database path during runtime

i had done a project in vb using Msacess , i want to display the tables name in my form , pls help me for to complete my project

vinothmanimaran

Reputation Points: 10

Solved Threads: 0

Newbie Poster

Offline

2 posts
since Mar 2008

Permalink

Jan 13th, 2009

Re: changing ms access database path during runtime

HI THERE, i wana connect msaccess database to vb6, so that i can be able to view the data in the tables in the database in the listbox, so far this the code i used to connect but get this error "The connection cannot be used to perfom this operation. its either closed or ivalid in this context." my database name is"Storenw", and the table i want to access is "sales". can any one help or tell me wher i went wrong..

Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text)
 
 Option Explicit  
Private Sub cmdbuynow_Click()  
Dim cn As New ADODB.Connection 
Dim strCNString As String 
Dim rs As New ADODB.Recordset 
Dim Txt As String    
On Error GoTo ErrHandler    
 'Connect to database   
 strCNString = "Data Source=" & App.Path & "\Storenw.mdb"    cn.Provider = "Microsoft Jet 4.0 OLE DB Provider"    cn.ConnectionString = strCNString    cn.Properties("Jet OLEDB:Database Password") = ""    
cn.Open     
   'Open recordsource   
 With rs      
  .Open "Select * from sales , cn, adOpenDynamic, adLockOptimistic"       
     cn.Close            
Unload Me          
frmSales.Show               
 End With 
 ExitHere:    
Exit Sub  
ErrHandler:  
  MsgBox Err.Number & " " & Err.Description, vbCritical, "Error!!!"    cn.Close   
  End Sub
       
 Option Explicit  
Private Sub cmdbuynow_Click()  
Dim cn As New ADODB.Connection 
Dim strCNString As String 
Dim rs As New ADODB.Recordset 
Dim Txt As String    
On Error GoTo ErrHandler    
 'Connect to database   
 strCNString = "Data Source=" & App.Path & "\Storenw.mdb"    cn.Provider = "Microsoft Jet 4.0 OLE DB Provider"    cn.ConnectionString = strCNString    cn.Properties("Jet OLEDB:Database Password") = ""    
cn.Open     
   'Open recordsource   
 With rs      
  .Open "Select * from sales , cn, adOpenDynamic, adLockOptimistic"       
     cn.Close            
Unload Me          
frmSales.Show               
 End With 
 ExitHere:    
Exit Sub  
ErrHandler:  
  MsgBox Err.Number & " " & Err.Description, vbCritical, "Error!!!"    cn.Close   
  End Sub

Last edited by Ancient Dragon; Jan 13th, 2009 at 10:54 am. Reason: add code tags

sackymatt

Reputation Points: 10

Solved Threads: 0

Light Poster

Offline

29 posts
since Dec 2008

Permalink

Jan 13th, 2009

Re: changing ms access database path during runtime

Quote ...

can any one help or tell me wher i went wrong..

1) You didn't start your own thread.
2) You didn't use code tags.
3) You didn't post which line is highlighted when it goes into debug

Comatose

Team Colleague

Reputation Points: 361

Solved Threads: 214

Taboo Programmer

Offline

2,413 posts
since Dec 2004

This thread is solved

Either the thread starter or a moderator has marked this thread as solved. You can most likely trust the responses and answers given. There is most likely no reason for any further responses to be posted here. If you have a related question, please start a new thread in this forum instead.

This thread is more than three months old

No one has posted to this discussion for at least three months. Please let old threads die and do not reply to them unless you feel you have something new and valuable to contribute that absolutely must be added to make the discussion complete. Otherwise, please start a new thread in this forum instead.

Previous Thread in Visual Basic 4 / 5 / 6 Forum Timeline: i need a random generator

Next Thread in Visual Basic 4 / 5 / 6 Forum Timeline: Help! Print the Text in a Textbox and / or Label to Printer

DaniWeb Message

Cancel Changes