Including Kernel32.dll in VBScript to call GETACP()

Hi,

I need to call the GETAcp function in Kernel32.dll from NAV to get the ANSI codepage in the local client machine. I am having problems in scripting this script. My script is as follows:

Private Declare Function test123 Lib “Kernel32.dll” () As Long

Msgbox test123

But I am getting compilation errors:


Windows Script Host


Script: C:\temp.vbs

Line: 1

Char: 17

Error: Expected end of statement

Code: 800A0401

Source: Microsoft VBScript compilation error


OK


is there something wrong with my code? Is there any alternative to get the local ANSI code page?

many thanks.