ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Access remote database with IP address (https://www.excelbanter.com/excel-programming/395524-access-remote-database-ip-address.html)

Angus

Access remote database with IP address
 
I got a code to access a database on a share drive and the code will be send
to users. But the drive map is different for everyone, for me it's x:\ but
others could be z:\...

i got the IP address of this drive as 12.345.678.90, how to put it into my
code? if the path is:

dim p as string
p="x:\share drive\folder\database.mdb\"


Michael

Access remote database with IP address
 
This is what you need:

p="\\12.345.678.90\share drive\folder\database.mdb\

Make sure you use the double backslash

Please rate this posting if helpful


Michael Arch.

"Angus" wrote:

I got a code to access a database on a share drive and the code will be send
to users. But the drive map is different for everyone, for me it's x:\ but
others could be z:\...

i got the IP address of this drive as 12.345.678.90, how to put it into my
code? if the path is:

dim p as string
p="x:\share drive\folder\database.mdb\"


Angus

Access remote database with IP address
 
I got an error message that '\\10.232.101.15\DS\SHIPPING.mdb' is not a valid
path...

If I just use "X:\DS\SHIPPING.mbd" then have no problem.

"Michael" wrote:

This is what you need:

p="\\12.345.678.90\share drive\folder\database.mdb\

Make sure you use the double backslash

Please rate this posting if helpful


Michael Arch.

"Angus" wrote:

I got a code to access a database on a share drive and the code will be send
to users. But the drive map is different for everyone, for me it's x:\ but
others could be z:\...

i got the IP address of this drive as 12.345.678.90, how to put it into my
code? if the path is:

dim p as string
p="x:\share drive\folder\database.mdb\"


Michael

Access remote database with IP address
 
OK,It could be the wrong IP address, you can verify that by going to the dos
prompt and pinging the server, if you can ping it, try mapping a network
pointing to the folder where your database resides, if it does not allow you
to connect to the network drive, you may have to use the server name somthing
like this:

\\ServerName\\DS\SHIPPING.mdb

You can also step through your code and place a msgbox that will show the
path, just to confirm that the parameter has the proper syntax.
So right after you do p="\\10.232.101.15\DS\SHIPPING.mdb"
Msgbox(p)


--
If this posting was helpful, please click on the Yes button.
Regards,

Michael Arch.




"Angus" wrote:

I got an error message that '\\10.232.101.15\DS\SHIPPING.mdb' is not a valid
path...

If I just use "X:\DS\SHIPPING.mbd" then have no problem.

"Michael" wrote:

This is what you need:

p="\\12.345.678.90\share drive\folder\database.mdb\

Make sure you use the double backslash

Please rate this posting if helpful


Michael Arch.

"Angus" wrote:

I got a code to access a database on a share drive and the code will be send
to users. But the drive map is different for everyone, for me it's x:\ but
others could be z:\...

i got the IP address of this drive as 12.345.678.90, how to put it into my
code? if the path is:

dim p as string
p="x:\share drive\folder\database.mdb\"


Angus

Access remote database with IP address
 
If my computer show '12.345.678.90'(X:) does it mean the IP is 12.345.678.90?

I ping and also msgbox it seems correct.

"Michael" wrote:

OK,It could be the wrong IP address, you can verify that by going to the dos
prompt and pinging the server, if you can ping it, try mapping a network
pointing to the folder where your database resides, if it does not allow you
to connect to the network drive, you may have to use the server name somthing
like this:

\\ServerName\\DS\SHIPPING.mdb

You can also step through your code and place a msgbox that will show the
path, just to confirm that the parameter has the proper syntax.
So right after you do p="\\10.232.101.15\DS\SHIPPING.mdb"
Msgbox(p)


--
If this posting was helpful, please click on the Yes button.
Regards,

Michael Arch.




"Angus" wrote:

I got an error message that '\\10.232.101.15\DS\SHIPPING.mdb' is not a valid
path...

If I just use "X:\DS\SHIPPING.mbd" then have no problem.

"Michael" wrote:

This is what you need:

p="\\12.345.678.90\share drive\folder\database.mdb\

Make sure you use the double backslash

Please rate this posting if helpful


Michael Arch.

"Angus" wrote:

I got a code to access a database on a share drive and the code will be send
to users. But the drive map is different for everyone, for me it's x:\ but
others could be z:\...

i got the IP address of this drive as 12.345.678.90, how to put it into my
code? if the path is:

dim p as string
p="x:\share drive\folder\database.mdb\"


Michael

Access remote database with IP address
 
Yes, however, it is quite unusual to see the ip address listed on the mapped
drive, because it means the whole server is being shared, this is not always
the case.
Just for testing try:
p="\\127.0.0.1 p\SHIPPING.mdb"
Make sure however, that the database exist in the C:\ drive before this
test; also make sure it exist under the directory you are pointing to.

p="\\10.232.101.15\DS\SHIPPING.mdb"

--
If this posting was helpful, please click on the Yes button.
Regards,

Michael Arch.




"Angus" wrote:

If my computer show '12.345.678.90'(X:) does it mean the IP is 12.345.678.90?

I ping and also msgbox it seems correct.

"Michael" wrote:

OK,It could be the wrong IP address, you can verify that by going to the dos
prompt and pinging the server, if you can ping it, try mapping a network
pointing to the folder where your database resides, if it does not allow you
to connect to the network drive, you may have to use the server name somthing
like this:

\\ServerName\\DS\SHIPPING.mdb

You can also step through your code and place a msgbox that will show the
path, just to confirm that the parameter has the proper syntax.
So right after you do p="\\10.232.101.15\DS\SHIPPING.mdb"
Msgbox(p)


--
If this posting was helpful, please click on the Yes button.
Regards,

Michael Arch.




"Angus" wrote:

I got an error message that '\\10.232.101.15\DS\SHIPPING.mdb' is not a valid
path...

If I just use "X:\DS\SHIPPING.mbd" then have no problem.

"Michael" wrote:

This is what you need:

p="\\12.345.678.90\share drive\folder\database.mdb\

Make sure you use the double backslash

Please rate this posting if helpful


Michael Arch.

"Angus" wrote:

I got a code to access a database on a share drive and the code will be send
to users. But the drive map is different for everyone, for me it's x:\ but
others could be z:\...

i got the IP address of this drive as 12.345.678.90, how to put it into my
code? if the path is:

dim p as string
p="x:\share drive\folder\database.mdb\"


[email protected][_2_]

Access remote database with IP address
 
Can you store the file on sharepoint where everyone can use the same
URL?


Angus

Access remote database with IP address
 
Unfortunately we do not have a share point setup.

I ping the drive and everything looks good.

Is there any code that I can get the path info which can be used in vba code?

" wrote:

Can you store the file on sharepoint where everyone can use the same
URL?



[email protected][_2_]

Access remote database with IP address
 
On Aug 27, 9:08 pm, Angus wrote:
Unfortunately we do not have a share point setup.

I ping the drive and everything looks good.

Is there any code that I can get the path info which can be used in vba code?



" wrote:
Can you store the file on sharepoint where everyone can use the same
URL?- Hide quoted text -


- Show quoted text -


Try googling : "Enumerating network shares" on
microsoft.public.scripting.vbscript


Look for svrcheck.exe or try something like this:

Function getNetShares(strHostName)


Dim objWMIService
Dim colShares
Dim objShare
Dim strMyMsg


On Error Resume Next

' I don't know what \root\cimv2 is.

Set objWMIService = GetObject("winmgmts:" &
"{impersonationLevel=impersonate,authenticationLev el=Default}!\\" &
strHostName & "\root\cimv2")

Set colShares = objWMIService.ExecQuery("Select * from Win32_Share", ,
48)

For Each objShare in colShares
strMyMsg = "Share Name: " & vbTab & objShare.Name & vbCrLf
strMyMsg = strMyMsg & "Share Caption: " & vbTab &
objShare.Caption & vbCrLf
strMyMsg = strMyMsg & "Share Path: " & vbTab & objShare.Path &
vbCrLf
strMyMsg = strMyMsg & "Share Type: " & vbTab &
getShareType(objShare.Type) & vbCrLf
WScript.Echo strMyMsg
Next


Set objWMIService = Nothing
Set colShares = Nothing


getNetShares = Err.Number


End Function


getNetShares("my-machine")




[email protected][_2_]

Access remote database with IP address
 
Oh yeah, can you prompt the user to navigate to the mdb file with a
FileOpenDialog?


Angus

Access remote database with IP address
 
At last I found out the correct path is "\\10.232.101.15\Share\DS\Shipping.mdb"

I didn't see that path "\\10.232.101.15\Share\" at my window explorer,
yesterday when i travelled to another office and access their network then I
could see this path. Now it works.

Thanks for everybody's help.

"Michael" wrote:

Yes, however, it is quite unusual to see the ip address listed on the mapped
drive, because it means the whole server is being shared, this is not always
the case.
Just for testing try:
p="\\127.0.0.1 p\SHIPPING.mdb"
Make sure however, that the database exist in the C:\ drive before this
test; also make sure it exist under the directory you are pointing to.

p="\\10.232.101.15\DS\SHIPPING.mdb"

--
If this posting was helpful, please click on the Yes button.
Regards,

Michael Arch.




"Angus" wrote:

If my computer show '12.345.678.90'(X:) does it mean the IP is 12.345.678.90?

I ping and also msgbox it seems correct.

"Michael" wrote:

OK,It could be the wrong IP address, you can verify that by going to the dos
prompt and pinging the server, if you can ping it, try mapping a network
pointing to the folder where your database resides, if it does not allow you
to connect to the network drive, you may have to use the server name somthing
like this:

\\ServerName\\DS\SHIPPING.mdb

You can also step through your code and place a msgbox that will show the
path, just to confirm that the parameter has the proper syntax.
So right after you do p="\\10.232.101.15\DS\SHIPPING.mdb"
Msgbox(p)


--
If this posting was helpful, please click on the Yes button.
Regards,

Michael Arch.




"Angus" wrote:

I got an error message that '\\10.232.101.15\DS\SHIPPING.mdb' is not a valid
path...

If I just use "X:\DS\SHIPPING.mbd" then have no problem.

"Michael" wrote:

This is what you need:

p="\\12.345.678.90\share drive\folder\database.mdb\

Make sure you use the double backslash

Please rate this posting if helpful


Michael Arch.

"Angus" wrote:

I got a code to access a database on a share drive and the code will be send
to users. But the drive map is different for everyone, for me it's x:\ but
others could be z:\...

i got the IP address of this drive as 12.345.678.90, how to put it into my
code? if the path is:

dim p as string
p="x:\share drive\folder\database.mdb\"



All times are GMT +1. The time now is 01:55 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com