Page 1 of 1 1
Topic Options
#48073 - 1999-08-20 05:09 AM using "difficult" OLE FUNCTIONS
Anonymous
Unregistered


can anybody translate this easy vbscript
to kix script, as I dont seem to get the
OLECALLFUNC/OLECALLPROC lines right

thank you

set cd = createobject("MSComDlg.CommonDialog")

cd.Filter = "All Files(*.*)|*.*"
cd.FilterIndex = 3
cd.MaxFileSize = 128
cd.ShowOpen()

Top
#48074 - 1999-10-14 07:01 PM Re: using "difficult" OLE FUNCTIONS
Anonymous
Unregistered


This worked on NT. The OLEPutProperty documentation doesn't include the "Typelist", but it supports it correctly(see OLECallProc documentation). Also, the documentation for typelist never includes "s" for string.
-----------
$cd = OleCreateObject("MSComDlg.CommonDialog")
$nul = OLEPutProperty($cd,"Filter","s","All Files (*.*)|*.*")
$nul = OLEPutProperty($cd,"FilterIndex","I","3")
$nul = OLEPutProperty($cd,"MaxFileSize","I","128")
$nul = OLECallProc($cd,"ShowOpen")
-----------
hope this helps,
SRHarmon

Top
Page 1 of 1 1


Moderator:  Glenn Barnas, NTDOC, Arend_, Jochen, Radimus, Allen, ShaneEP, Ruud van Velsen, Mart 
Hop to:
Shout Box

Who's Online
1 registered (Henriques) and 2516 anonymous users online.
Newest Members
fgarcia, Viginette, ManuvdWielNL, Sir_Barrington, batdk82
17889 Registered Users

Generated in 0.05 seconds in which 0.026 seconds were spent on a total of 12 queries. Zlib compression enabled.

Search the board with:
superb Board Search
or try with google:
Google
Web kixtart.org