bat file into vba (1 Viewer)

E

ECEK

Registered User.

Local time

Today, 11:51

Joined

Dec 19, 2012

Messages

717

• Oct 20, 2017

• #1

Can anybody point me in the right direction.
At present my VBA code calls a bat file.

This is the bat script

Code:Copy to clipboard

@ECHO OFF
S:
CD\
CLS
copy /Y "C:\Access Databases\*.accdb" "D:\Access Databases\User1\*.accdb"
copy /Y "C:\Access Databases\*.accdb" "D:\Access Databases\User2\*.accdb"

exit

I need to insert this into my VBA code.

 

Ranman256

Well-known member

Local time

Today, 06:51

Joined

Apr 9, 2015

Messages

4,337

• Oct 20, 2017

• #2

call Shell("c:\folder\my.bat")

 

E

ECEK

Registered User.

Local time

Today, 11:51

Joined

Dec 19, 2012

Messages

717

• Oct 20, 2017

• #3

Hi Ranman. I don't want to call the bat file.

I want the bat script as part of my VBA code.

 

Minty

AWF VIP

Local time

Today, 11:51

Joined

Jul 26, 2013

Messages

10,371

• Oct 20, 2017

• #4

If you are trying to copy the database you have open this won't work. If it's another database then use the VBA FileCopy

FileCopy Source Target

https://msdn.microsoft.com/en-us/library/2s1c774y(v=vs.90).aspx

 

Ranman256

Well-known member

Local time

Today, 06:51

Joined

Apr 9, 2015

Messages

4,337

• Oct 20, 2017

• #5

usage:
Copy1File sSrcFile, sTargFile

Code:Copy to clipboard

Public Sub Copy1File(ByVal pvSrc, ByVal pvTarg)
Dim FSO
Set FSO = CreateObject("Scripting.FileSystemObject")
FSO.CopyFile pvSrc, pvTarg
Set FSO = Nothing
End Sub

 

arnelgp

..forever waiting... waiting for jellybean!

Local time

Today, 18:51

Joined

May 7, 2009

Messages

19,234

• Oct 20, 2017

• #6

Also yiu can use the VBA namespace
To change folder:
VBA.CHDir

To copy file:
VBA.FileCopy