Author: sexy69
Subject: How to replace "Wscript.Arguments" for VB6?
Posted: Tue Aug 23, 2016 2:36 am (GMT -6)
This script is to show the full path of the selected file.
TC button:
Command: B:\test.vbs
Parameter: %L
As the VBS script rewrite for VB6?
Subject: How to replace "Wscript.Arguments" for VB6?
Posted: Tue Aug 23, 2016 2:36 am (GMT -6)
This script is to show the full path of the selected file.
TC button:
Command: B:\test.vbs
Parameter: %L
| Code: |
| Set ABC = CreateObject("Scripting.FileSystemObject") '***************************** 'Here is the problem. Set Path = Wscript.Arguments '<-- How to replace "Wscript.Arguments" for VB6? '***************************** Set MyFile = ABC.OpenTextFile(Path.Item(0),1) FullName1 = MyFile.ReadLine MyFile.Close Msgbox FullName |
As the VBS script rewrite for VB6?