37 #define VB_E_CANNOT_CREATE_OBJ 0x800a01ad 38 #define VB_E_MK_PARSE_ERROR 0x800a01b0 42 {0x10200490,0xfa38,0x11d0,{0xac,0x0e,0x00,0xa0,0xc9,0xf,0xff,0xc0}};
124 TRACE(
"(%p)->(%u %u %p)\n",
This, iTInfo, lcid, ppTInfo);
160 FIXME(
"NULL context\n");
164 for(
i = 0;
i < name_cnt;
i++) {
184 FIXME(
"NULL context\n");
188 if(
id >=
This->member_cnt || (!
This->members[
id].proc && !
This->members[
id].flags))
190 prop =
This->members +
id;
195 FIXME(
"property does not support DISPATCH_PROPERTYGET\n");
201 const int vt = prop->min_args,
val = prop->max_args;
230 FIXME(
"Call on property\n");
236 FIXME(
"property does not support DISPATCH_PROPERTYPUT\n");
249 if(argn < prop->min_args || argn > (prop->max_args ? prop->max_args : prop->min_args)) {
250 WARN(
"invalid number of arguments\n");
256 for(
i=0;
i < argn;
i++) {
260 args[
i] = dp->rgvarg[dp->cArgs-
i-1];
305 hres = IActiveScriptSite_QueryInterface(
ctx->site, &IID_IServiceProvider, (
void**)&
sp);
309 hres = IServiceProvider_QueryService(
sp, &SID_SInternetHostSecurityManager, &IID_IInternetHostSecurityManager,
311 IServiceProvider_Release(
sp);
315 return ctx->secmgr = secmgr;
477 hres = IObjectWithSite_SetSite(obj_site, ax_site);
478 IUnknown_Release(ax_site);
482 IObjectWithSite_Release(obj_site);
505 if(
ctx->safeopt & INTERFACE_USES_SECURITY_MANAGER) {
511 hres = IInternetHostSecurityManager_ProcessUrlAction(secmgr, URLACTION_ACTIVEX_RUN,
521 hres = IClassFactory_QueryInterface(
cf, &IID_IClassFactoryEx, (
void**)&cfex);
523 FIXME(
"Use IClassFactoryEx\n");
524 IClassFactoryEx_Release(cfex);
536 &bpolicy, &policy_size, (
BYTE*)&
cs,
sizeof(
cs), 0);
538 policy = policy_size >=
sizeof(
DWORD) ? *(
DWORD*)bpolicy : URLPOLICY_DISALLOW;
543 IUnknown_Release(
obj);
550 IUnknown_Release(
obj);
568 hres = IActiveScriptSite_QueryInterface(
ctx->site, &IID_IActiveScriptSiteUIControl, (
void**)&ui_control);
571 IActiveScriptSiteUIControl_Release(ui_control);
586 hres = IActiveScriptSite_QueryInterface(
ctx->site, &IID_IActiveScriptSiteWindow, (
void**)&acts_window);
588 FIXME(
"No IActiveScriptSiteWindow\n");
592 if(
ctx->safeopt & INTERFACE_USES_SECURITY_MANAGER) {
593 if(orig_title && *orig_title) {
613 hres = IActiveScriptSiteWindow_GetWindow(acts_window, &
hwnd);
615 hres = IActiveScriptSiteWindow_EnableModeless(acts_window,
FALSE);
618 hres = IActiveScriptSiteWindow_EnableModeless(acts_window,
TRUE);
623 IActiveScriptSiteWindow_Release(acts_window);
807 return n < 10 ?
'0'+
n :
'A'+
n-10;
881 *
ptr-- =
'0' + (
n & 0x7);
1100 assert(args_cnt == 1 || args_cnt == 2);
1140 for(
i = 0;
i < 3;
i++) {
1281 assert(args_cnt == 2 || args_cnt == 3);
1341 assert(args_cnt == 2 || args_cnt == 3);
1343 if (args_cnt == 3) {
1349 FIXME(
"unknown compare mode = %d\n",
mode);
1494 WCHAR *begin_ptr, *end_ptr;
1508 for(begin_ptr =
str; *begin_ptr &&
iswspace(*begin_ptr); begin_ptr++);
1559 VARIANT *startv, *str1v, *str2v;
1566 assert(2 <= args_cnt && args_cnt <= 4);
1693 if((
c!=(
short)
c &&
c!=(
unsigned short)
c) ||
1694 (
unsigned short)
c>=(cpi.
MaxCharSize>1 ? 0x10000 : 0x100)) {
1695 WARN(
"invalid arg %d\n",
c);
1704 WARN(
"invalid arg %d, cp %d\n",
c,
cp);
1809 val =
v == 0 ? 0 : (
v > 0 ? 1 : -1);
1971 assert(1 <= args_cnt && args_cnt <= 5);
1984 FIXME(
"unsupported arg_cnt %d\n", args_cnt);
2004 FIXME(
"non-bstr arg\n");
2020 IUnknown_Release(
obj);
2036 FIXME(
"unsupported args\n");
2040 if(
This->ctx->safeopt & (INTERFACE_USES_SECURITY_MANAGER|INTERFACESAFE_FOR_UNTRUSTED_DATA)) {
2041 WARN(
"blocked in current safety mode\n");
2052 IMoniker_Release(mon);
2056 IBindCtx_Release(bind_ctx);
2062 IUnknown_Release(obj_unk);
2072 IDispatch_Release(disp);
2075 FIXME(
"object does not support IDispatch\n");
2101 static const WCHAR ByteW[] = {
'B',
'y',
't',
'e', 0};
2102 static const WCHAR IntegerW[] = {
'I',
'n',
't',
'e',
'g',
'e',
'r', 0};
2103 static const WCHAR LongW[] = {
'L',
'o',
'n',
'g', 0};
2104 static const WCHAR SingleW[] = {
'S',
'i',
'n',
'g',
'l',
'e', 0};
2105 static const WCHAR DoubleW[] = {
'D',
'o',
'u',
'b',
'l',
'e', 0};
2106 static const WCHAR CurrencyW[] = {
'C',
'u',
'r',
'r',
'e',
'n',
'c',
'y', 0};
2107 static const WCHAR DecimalW[] = {
'D',
'e',
'c',
'i',
'm',
'a',
'l', 0};
2108 static const WCHAR DateW[] = {
'D',
'a',
't',
'e', 0};
2109 static const WCHAR StringW[] = {
'S',
't',
'r',
'i',
'n',
'g', 0};
2110 static const WCHAR BooleanW[] = {
'B',
'o',
'o',
'l',
'e',
'a',
'n', 0};
2111 static const WCHAR EmptyW[] = {
'E',
'm',
'p',
't',
'y', 0};
2112 static const WCHAR NullW[] = {
'N',
'u',
'l',
'l', 0};
2157 TRACE(
"arg_cnt=%u\n", args_cnt);
2171 for(
i=0;
i<args_cnt;
i++) {
2223 WCHAR *ptr1, *ptr2, ch;
2235 while(ptr1 < ptr2) {
2253 FIXME(
"Unsupported args\n");
2257 assert(2 <= args_cnt && args_cnt <= 4);
2372 int weekday, first_day = 1, abbrev = 0;
2378 assert(1 <= args_cnt && args_cnt <= 3);
2405 int month, abbrev = 0;
2411 assert(args_cnt == 1 || args_cnt == 2);
2499 FIXME(
"Setter not supported\n");
2744 FIXME(
"setter not implemented\n");
2764 FIXME(
"setter not implemented\n");
2789 int code, helpcontext = 0;
2818 if(!
ctx->ei.bstrSource)
2824 if(!
ctx->ei.bstrDescription)
2831 ctx->ei.dwHelpContext = helpcontext;
2834 hres = SCRIPT_E_RECORDED;
2859 IDispatch_Release(&
ctx->err_obj->IDispatch_iface);
2863 if(
ctx->global_obj) {
2865 IDispatch_Release(&
ctx->global_obj->IDispatch_iface);
static HRESULT Global_LTrim(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
_STLP_DECLSPEC complex< float > _STLP_CALL sqrt(const complex< float > &)
static const WCHAR emptyW[]
static HRESULT Global_IsObject(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static const WCHAR DateW[]
static const WCHAR vbscriptW[]
static HRESULT Global_LCase(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
unsigned __int3264 UINT_PTR
#define DEFAULT_UNREACHABLE
static HRESULT Global_Date(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Month(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_AscB(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
BOOL WINAPI GetCPInfo(UINT CodePage, LPCPINFO CodePageInfo)
static HRESULT Global_Len(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Right(BuiltinDisp *This, VARIANT *args, unsigned args_cnt, VARIANT *res)
BSTR get_vbscript_string(int) DECLSPEC_HIDDEN
HRESULT WINAPI DECLSPEC_HOTPATCH VariantChangeType(VARIANTARG *pvargDest, VARIANTARG *pvargSrc, USHORT wFlags, VARTYPE vt)
static HRESULT Global_AscW(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
#define DISPATCH_PROPERTYGET
static HRESULT Global_Minute(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_GetRef(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT return_date(VARIANT *res, double date)
int memcmp(void *Buffer1, void *Buffer2, ACPI_SIZE Count)
VOID WINAPI CoTaskMemFree(LPVOID ptr)
static HRESULT Global_GetObject(BuiltinDisp *This, VARIANT *args, unsigned args_cnt, VARIANT *res)
HRESULT get_builtin_id(BuiltinDisp *disp, const WCHAR *name, DISPID *id)
static HRESULT Global_DateValue(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_LBound(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
BSTR WINAPI SysAllocStringLen(const OLECHAR *str, unsigned int len)
static HRESULT Global_Cos(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_ChrW(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_CSng(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Split(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Asc(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
HRESULT to_int(VARIANT *v, int *ret)
#define VBSCRIPT_MAJOR_VERSION
_CONST_RETURN wchar_t *__cdecl wcsstr(_In_z_ const wchar_t *_Str, _In_z_ const wchar_t *_SubStr)
#define VARIANT_LOCALBOOL
static HRESULT Global_CDbl(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
GLdouble GLdouble GLdouble r
#define VB_E_CANNOT_CREATE_OBJ
static HRESULT Global_IsNull(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT WINAPI Builtin_GetTypeInfo(IDispatch *iface, UINT iTInfo, LCID lcid, ITypeInfo **ppTInfo)
HRESULT WINAPI VarDateFromUdateEx(UDATE *pUdateIn, LCID lcid, ULONG dwFlags, DATE *pDateOut)
static HRESULT Global_Hex(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
#define DISP_E_MEMBERNOTFOUND
static const WCHAR BooleanW[]
static const string_constant_t vbNullChar
static const string_constant_t vbFormFeed
#define VBSE_ILLEGAL_NULL_USE
HRESULT WINAPI VariantCopyInd(VARIANT *pvargDest, VARIANTARG *pvargSrc)
static HRESULT Global_FormatCurrency(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Err_HelpContext(BuiltinDisp *This, VARIANT *args, unsigned args_cnt, VARIANT *res)
#define VAR_TIMEVALUEONLY
static HRESULT Global_IsEmpty(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_ScriptEngineMajorVersion(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_RTrim(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT to_system_time(VARIANT *v, SYSTEMTIME *st)
static HRESULT Global_Sin(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT show_msgbox(script_ctx_t *ctx, BSTR prompt, unsigned type, BSTR orig_title, VARIANT *res)
void clear_ei(script_ctx_t *ctx)
HRESULT WINAPI DECLSPEC_HOTPATCH CLSIDFromProgID(LPCOLESTR progid, LPCLSID clsid)
static void * heap_alloc(size_t len)
static HRESULT Err_Description(BuiltinDisp *This, VARIANT *args, unsigned args_cnt, VARIANT *res)
#define VBSE_ILLEGAL_FUNC_CALL
GLsizei GLsizei GLuint * obj
WDF_INTERRUPT_POLICY policy
#define MB_ICONEXCLAMATION
HRESULT WINAPI VarAbs(LPVARIANT pVarIn, LPVARIANT pVarOut)
static HRESULT Global_DateDiff(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_UCase(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT WINAPI Builtin_GetIDsOfNames(IDispatch *iface, REFIID riid, LPOLESTR *names, UINT name_cnt, LCID lcid, DISPID *ids)
GLenum GLuint GLenum GLsizei const GLchar * buf
static HRESULT Global_Execute(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static const string_constant_t vbCrLf
static HRESULT Global_IsNumeric(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT return_bstr(VARIANT *res, BSTR str)
BOOL WINAPI IsDBCSLeadByteEx(UINT CodePage, BYTE TestByte)
static HRESULT Global_Hour(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_CByte(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Sqr(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_CreateObject(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Err_Source(BuiltinDisp *This, VARIANT *args, unsigned args_cnt, VARIANT *res)
HRESULT WINAPI SafeArrayAccessData(SAFEARRAY *psa, void **ppvData)
#define VBSCRIPT_MINOR_VERSION
static HRESULT Global_Replace(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static BuiltinDisp * impl_from_IDispatch(IDispatch *iface)
#define HRESULT_FACILITY(hr)
static HRESULT Global_InStrRev(BuiltinDisp *This, VARIANT *args, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Year(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT WINAPI Builtin_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
IDispatch IDispatch_iface
static HRESULT Global_Err(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_ScriptEngineMinorVersion(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
_STLP_DECLSPEC complex< float > _STLP_CALL cos(const complex< float > &)
BSTR WINAPI SysAllocString(LPCOLESTR str)
const builtin_prop_t * members
static HRESULT return_null(VARIANT *res)
VOID WINAPI GetLocalTime(OUT LPSYSTEMTIME lpSystemTime)
static HRESULT Global_Array(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
HRESULT(* proc)(BuiltinDisp *, VARIANT *, unsigned, VARIANT *)
#define DISPATCH_PROPERTYPUT
static HRESULT Global_Log(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
PFLT_MESSAGE_WAITER_QUEUE CONTAINING_RECORD(Csq, DEVICE_EXTENSION, IrpQueue)) -> WaiterQ.mLock) _IRQL_raises_(DISPATCH_LEVEL) VOID NTAPI FltpAcquireMessageWaiterLock(_In_ PIO_CSQ Csq, _Out_ PKIRQL Irql)
HRESULT WINAPI DECLSPEC_HOTPATCH CoGetClassObject(REFCLSID rclsid, DWORD dwClsContext, COSERVERINFO *pServerInfo, REFIID iid, LPVOID *ppv)
static HRESULT Global_Int(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT return_short(VARIANT *res, short val)
static HRESULT Global_InStr(BuiltinDisp *This, VARIANT *args, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Abs(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_IsDate(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_CLng(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static const string_constant_t vbCr
#define VAR_DATEVALUEONLY
static HRESULT Global_StrReverse(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_MsgBox(BuiltinDisp *This, VARIANT *args, unsigned args_cnt, VARIANT *res)
BSTR get_vbscript_error_string(HRESULT) DECLSPEC_HIDDEN
static HRESULT Global_TimeValue(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
HRESULT WINAPI CreateBindCtx(DWORD reserved, LPBC *ppbc)
int WINAPI MessageBoxW(_In_opt_ HWND, _In_opt_ LPCWSTR, _In_opt_ LPCWSTR, _In_ UINT)
void detach_global_objects(script_ctx_t *ctx)
static HRESULT Global_ScriptEngine(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Weekday(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_RGB(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_ExecuteGlobal(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_CBool(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
INT WINAPI VariantTimeToSystemTime(double dateIn, LPSYSTEMTIME lpSt)
const IID IID_IObjectWithSite
static HRESULT return_string(VARIANT *res, const WCHAR *str)
static const builtin_prop_t global_props[]
static HRESULT Global_Join(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
HRESULT init_global(script_ctx_t *ctx)
static HRESULT Global_Day(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT err_string_prop(BSTR *prop, VARIANT *args, unsigned args_cnt, VARIANT *res)
const GUID GUID_CUSTOM_CONFIRMOBJECTSAFETY
unsigned __int3264 UINT_PTR
static REFPROPVARIANT PROPVAR_CHANGE_FLAGS VARTYPE vt
GLint GLenum GLsizei GLsizei GLsizei GLint GLsizei const GLvoid * data
static HRESULT WINAPI Builtin_GetTypeInfoCount(IDispatch *iface, UINT *pctinfo)
static IInternetHostSecurityManager * get_sec_mgr(script_ctx_t *ctx)
HRESULT WINAPI SafeArrayDestroy(SAFEARRAY *psa)
valarray< _Tp > atan(const valarray< _Tp > &__x)
WINE_DEFAULT_DEBUG_CHANNEL(jscript)
static const string_constant_t vbNewLine
static HRESULT Global_Filter(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
#define VBSE_FUNC_ARITY_MISMATCH
static IUnknown * create_object(script_ctx_t *ctx, const WCHAR *progid)
static HRESULT Global_Erase(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
#define DISP_E_BADVARTYPE
static HRESULT Err_Number(BuiltinDisp *This, VARIANT *args, unsigned args_cnt, VARIANT *res)
static HRESULT Err_Raise(BuiltinDisp *This, VARIANT *args, unsigned args_cnt, VARIANT *res)
static const string_constant_t vbVerticalTab
static HRESULT Global_WeekdayName(BuiltinDisp *This, VARIANT *args, unsigned args_cnt, VARIANT *res)
static HRESULT Global_FormatPercent(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
HRESULT WINAPI DECLSPEC_HOTPATCH VariantClear(VARIANTARG *pVarg)
#define InterlockedDecrement
static HRESULT Global_ScriptEngineBuildVersion(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_CInt(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Unescape(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Mid(BuiltinDisp *This, VARIANT *args, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Eval(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
#define memcpy(s1, s2, n)
static HRESULT to_string(VARIANT *v, BSTR *ret)
UINT WINAPI SysStringLen(BSTR str)
static HRESULT Global_StrComp(BuiltinDisp *This, VARIANT *args, unsigned args_cnt, VARIANT *res)
enum tagSCRIPTUICHANDLING SCRIPTUICHANDLING
static HRESULT Global_CStr(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Time(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT return_double(VARIANT *res, double val)
#define VBSCRIPT_BUILD_VERSION
static HRESULT Global_CCur(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_VarType(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT return_bool(VARIANT *res, BOOL val)
static const WCHAR StringW[]
static HRESULT Global_FormatDateTime(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Atn(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Trim(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static const IDispatchVtbl BuiltinDispVtbl
static HRESULT Global_Oct(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
SAFEARRAY *WINAPI SafeArrayCreate(VARTYPE vt, UINT cDims, SAFEARRAYBOUND *rgsabound)
static HRESULT WINAPI Builtin_Invoke(IDispatch *iface, DISPID id, REFIID riid, LCID lcid, WORD flags, DISPPARAMS *dp, VARIANT *res, EXCEPINFO *ei, UINT *err)
_Check_return_ _CRTIMP int __cdecl wcscmp(_In_z_ const wchar_t *_Str1, _In_z_ const wchar_t *_Str2)
struct stdole::EXCEPINFO EXCEPINFO
static const char * debugstr_variant(const VARIANT *var)
static VARIANTARG static DISPID
static unsigned arg_cnt(const DISPPARAMS *dp)
HRESULT WINAPI SafeArrayGetUBound(SAFEARRAY *psa, UINT nDim, LONG *plUbound)
static HRESULT Global_LeftB(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
#define MB_ABORTRETRYIGNORE
static HRESULT Global_DateSerial(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
#define InterlockedIncrement
#define MAKE_VBSERROR(code)
GLsizei GLenum const GLvoid GLsizei GLenum GLbyte GLbyte GLbyte GLdouble GLdouble GLdouble GLfloat GLfloat GLfloat GLint GLint GLint GLshort GLshort GLshort GLubyte GLubyte GLubyte GLuint GLuint GLuint GLushort GLushort GLushort GLbyte GLbyte GLbyte GLbyte GLdouble GLdouble GLdouble GLdouble GLfloat GLfloat GLfloat GLfloat GLint GLint GLint GLint GLshort GLshort GLshort GLshort GLubyte GLubyte GLubyte GLubyte GLuint GLuint GLuint GLuint GLushort GLushort GLushort GLushort GLboolean const GLdouble const GLfloat const GLint const GLshort const GLbyte const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLdouble const GLfloat const GLfloat const GLint const GLint const GLshort const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort const GLdouble const GLfloat const GLint const GLshort GLenum GLenum GLenum GLfloat GLenum GLint GLenum GLenum GLenum GLfloat GLenum GLenum GLint GLenum GLfloat GLenum GLint GLint GLushort GLenum GLenum GLfloat GLenum GLenum GLint GLfloat const GLubyte GLenum GLenum GLenum const GLfloat GLenum GLenum const GLint GLenum GLint GLint GLsizei GLsizei GLint GLenum GLenum const GLvoid GLenum GLenum const GLfloat GLenum GLenum const GLint GLenum GLenum const GLdouble GLenum GLenum const GLfloat GLenum GLenum const GLint GLsizei GLuint GLfloat GLuint GLbitfield GLfloat GLint GLuint GLboolean GLenum GLfloat GLenum GLbitfield GLenum GLfloat GLfloat GLint GLint const GLfloat GLenum GLfloat GLfloat GLint GLint GLfloat GLfloat GLint GLint const GLfloat GLint GLfloat GLfloat GLint GLfloat GLfloat GLint GLfloat GLfloat const GLdouble const GLfloat const GLdouble const GLfloat GLint i
static HRESULT return_int(VARIANT *res, int val)
static HRESULT return_float(VARIANT *res, float val)
GLsizei GLsizei GLchar * source
static const string_constant_t vbLf
static HRESULT Global_LenB(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static ULONG WINAPI Builtin_Release(IDispatch *iface)
void WINAPI DECLSPEC_HOTPATCH SysFreeString(BSTR str)
BOOL WINAPI IsEqualGUID(REFGUID rguid1, REFGUID rguid2)
static HRESULT Global_InStrB(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Escape(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static const TCHAR helpfile[]
#define MultiByteToWideChar
static HRESULT Global_ChrB(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_InputBox(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static WCHAR hex_char(unsigned n)
static HRESULT Global_Timer(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Round(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
HRESULT WINAPI VarFix(LPVARIANT pVarIn, LPVARIANT pVarOut)
static HRESULT Global_UBound(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_DateAdd(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
HRESULT WINAPI MkParseDisplayName(LPBC pbc, LPCOLESTR szDisplayName, LPDWORD pchEaten, LPMONIKER *ppmk)
static HRESULT Global_MidB(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
IUnknown * create_ax_site(script_ctx_t *ctx)
static HRESULT Global_String(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Space(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Randomize(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
struct stdole::DISPPARAMS DISPPARAMS
static HRESULT Global_RightB(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT to_double(VARIANT *v, double *ret)
static HRESULT Global_CDate(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Second(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
HRESULT WINAPI VarInt(LPVARIANT pVarIn, LPVARIANT pVarOut)
static HRESULT Err_Clear(BuiltinDisp *This, VARIANT *args, unsigned args_cnt, VARIANT *res)
static const string_constant_t vbNullString
static SCRIPTUICHANDLING uic_handling
#define VBS_RUNTIME_ERROR
static HRESULT Global_DatePart(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Exp(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
_STLP_DECLSPEC complex< float > _STLP_CALL sin(const complex< float > &)
GLuint GLuint GLsizei GLenum type
static HRESULT Global_TypeName(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Tan(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Chr(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT create_builtin_dispatch(script_ctx_t *ctx, const builtin_prop_t *members, size_t member_cnt, BuiltinDisp **ret)
static const builtin_prop_t err_props[]
static HRESULT Global_Left(BuiltinDisp *This, VARIANT *args, unsigned args_cnt, VARIANT *res)
static HRESULT Global_TimeSerial(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static const string_constant_t vbTab
const GUID IID_IClassFactory
_STLP_DECLSPEC complex< float > _STLP_CALL tan(const complex< float > &)
static ULONG WINAPI Builtin_AddRef(IDispatch *iface)
INT WINAPI SystemTimeToVariantTime(LPSYSTEMTIME lpSt, double *pDateOut)
static HRESULT Global_Rnd(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static struct sockaddr_in sa
static HRESULT Global_LoadPicture(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_IsArray(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
HRESULT WINAPI SafeArrayUnaccessData(SAFEARRAY *psa)
static HRESULT Global_FormatNumber(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static unsigned(__cdecl *hash_bstr)(bstr_t s)
static HRESULT Err_HelpFile(BuiltinDisp *This, VARIANT *args, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Fix(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Sgn(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static BOOL heap_free(void *mem)
static HRESULT Global_MonthName(BuiltinDisp *This, VARIANT *args, unsigned args_cnt, VARIANT *res)
static HRESULT Global_Now(BuiltinDisp *This, VARIANT *arg, unsigned args_cnt, VARIANT *res)
static HRESULT set_object_site(script_ctx_t *ctx, IUnknown *obj)