Using Visual Basic Syntax Highlighting
{NeoBook Function}
Version=5.80
Language=VBScript
Param=[%1]|Text|LongFileName
Param=[%2]|Variable|Return var
{End}
publication.nbSetVar "[%2]", CreateObject("Scripting.FileSystemObject").GetFile("[%1]").ShortPath
Version=5.80
Language=VBScript
Param=[%1]|Text|LongFileName
Param=[%2]|Variable|Return var
{End}
publication.nbSetVar "[%2]", CreateObject("Scripting.FileSystemObject").GetFile("[%1]").ShortPath
Parsed in 0.003 seconds, using GeSHi 1.0.8.10
Usage:
Using Neobook Syntax Highlighting
enjoy !
David de Argentina