Running a VB script inside an access database

[shelton1979]

I have created a vb script that will convert a file to text for me to import those records, but I can't seem to run it from Access. Can someone help me. here's the vb script i'm using.

Option Explicit
Dim oFSO

Set oFSO = CreateObject("Scripting.FileSystemObject")
If oFSO.FileExists("C:\p45\OMS\6059.sc") = True Then
oFSO.CopyFile"C:\P45\OMS\6059.sc", "C:\P45\OMS\6059.txt"
Else
'The first file was not there
WScript.Quit()
End If

If oFSO.FileExists("C:\p45\OMS\6059.txt") = True Then
oFSO.DeleteFile("C45\OMS\6059.sc")
Else
'There was a problem with the copy because the
'new file is not present
End If

Set oFSO = Nothing

 

[EBGreen]

ou should be able to do this easily with VBA, but if you want to stick with VBS, what errors are you getting and how are you trying to execute it?

[blue]"Well, once again my friend, we find that science is a two headed beast. One head is nice, it gives us aspirin and other modern conveniences,...but the other head of science is BAD! Oh, beware the other head of science, Arthur; it bites!!" - The Tick[/blue]

 

[shelton1979]

i have no clue doing this. i tried to manage it.

 

[EBGreen]

How are you attempting to execute the script?

[blue]"Well, once again my friend, we find that science is a two headed beast. One head is nice, it gives us aspirin and other modern conveniences,...but the other head of science is BAD! Oh, beware the other head of science, Arthur; it bites!!" - The Tick[/blue]

 

[shelton1979]

i'm running it outside the database from the desktop

 

[EBGreen]

What error do you get?

[blue]"Well, once again my friend, we find that science is a two headed beast. One head is nice, it gives us aspirin and other modern conveniences,...but the other head of science is BAD! Oh, beware the other head of science, Arthur; it bites!!" - The Tick[/blue]

 

[shelton1979]

Line 6, Char 3, Permission Denied when I try to run the macro that uses the following code:

RunApp wscript S:/Education/rename.vbs

 

[EBGreen]

If you open an explorer window and simply double-click on the script, what happens?

[blue]"Well, once again my friend, we find that science is a two headed beast. One head is nice, it gives us aspirin and other modern conveniences,...but the other head of science is BAD! Oh, beware the other head of science, Arthur; it bites!!" - The Tick[/blue]

 

[shelton1979]

the script works that way. I want it to execute in the access database.

 

[EBGreen]

Open a database. Create or open a module for editing. In the MS Editor, press F1 to open help. Look for help on:
Shell
FileCopy
FileSystemObject

[blue]"Well, once again my friend, we find that science is a two headed beast. One head is nice, it gives us aspirin and other modern conveniences,...but the other head of science is BAD! Oh, beware the other head of science, Arthur; it bites!!" - The Tick[/blue]

 

[BNPMike]

Download this:

http://www.microsoft.com/downloads/...5e-1fe2-4550-9a81-925d62599963&displaylang=en

This is Access and VBA but is using Scripting Objects including FileSystemObject.