Declare INTEGER VarPtr IN "msvbvm50.dll" As "VarStrToPtr" String @var Declare INTEGER VarPtr IN "msvbvm50.dll" As "VarNumToPtr" Integer @var Declare INTEGER VarPtr IN "msvbvm50.dll" As "VarObjToPtr" Object @var cName = "S" ptr = VarStrToPtr(cName) ? ptr && 57831008 nNum = 1000 ptr = VarNumToPtr(nNum) ? ptr && 1241216 oObj = createobject("Session") ptr = VarObjToPtr(oObj) ? ptr