Recent Posts

Pages: 1 ... 8 9 [10]
91
Problems & Solutions / Re: COM OLE
« Last post by Charles Pegge on March 14, 2021, 04:45:10 AM »
I have just uploaded my current version.

If you download it so we are in complete sync, and try again:

https://github.com/Charles-Pegge/OxygenBasic/blob/master/OxygenBasic030.zip
92
Problems & Solutions / Re: COM OLE
« Last post by JRS on March 14, 2021, 03:37:10 AM »
The clipboard SAPI and both COM webrowser examples worked fine. I'll give this example a try as well.

Update

It didn't work. I got the quick busy cursor but no "Hello World". (speakers on)

sapiDemo1.o2bas worked.

CallByName.o2bas didn't work.
93
Problems & Solutions / Re: COM OLE
« Last post by Charles Pegge on March 14, 2021, 02:01:54 AM »
Hi John,

Does this SAPI callbyname example work on your system?

Code: [Select]
  '16:33 09/11/2020
  '10:01 14/03/2021
  'com automation
  '
  $filename "t.exe"
  'uses rtl64
  uses  COM/COMutil
  CoInitialize null
  CreateInterfaceByName "SAPI.SpVoice" voice
  'ConnectByName "SAPI.SpVoice", voice
  '
  BSTR r
  GetByName(voice,"volume",r) : print "vol " r
  GetByName(voice,"rate",r) : print "rate " r
  CallByName( voice,"speak", BSTR {"Hello World"} )
  LetByName(voice,"volume",7)
  LetByName(voice,"rate",3)
  CallByName( voice,"speak", BSTR {"Hello World","1"} )
  '
  'Working with variants
  ======================
  indexbase 1
  VARIANT va[2]
  va.vt[1]=VT_BSTR : va[1].bstrval="Hello Sky"
  va.vt[2]=VT_BSTR : va[2].lval=1
  CallByNameV( voice, METHOD,"speak", va,2 )
  del va.bstrval
  print err
  ...
  voice.Release
  CoUninitialize
94
Problems & Solutions / Re: COM OLE
« Last post by JRS on March 13, 2021, 05:52:30 AM »
Here is what I'm trying to do in O2. I ran this script from the same COM folder as the O2 version.
Code: Script BASIC
  1. IMPORT COM.sbi
  2.  
  3. obj = COM::CREATE(:SET, "MASLink.OCXForm")
  4. COM::CBN obj, "ShowOCXForm"
  5.  
  6. COM::RELEASE obj
  7.  

Attached is what we should see.
95
Problems & Solutions / COM OLE
« Last post by JRS on March 12, 2021, 08:21:14 PM »
Charles,

I tried your COM OLE CallByName interface with my MASLink OCX that I'm using with SB.

Code: OxygenBasic
  1. ' O2 VB6
  2.  
  3. $filename "mlink.exe"
  4. uses  COM/COMutil
  5. CoInitialize null
  6.  
  7. CreateInterfaceByName "MASLink.OCXForm" mlobj
  8. CallByName(mlobj, "ShowOCXForm")
  9.  
  10. mlobj.Release
  11. CoUninitialize
  12.  

The window never shows.  :(  No errors, just the cursor does a quick busy icon and that's it.
96
Open Forum / Re: Forum Activity
« Last post by Charles Pegge on March 06, 2021, 03:25:39 PM »
I've also edited the website /downloads page
97
Open Forum / Re: Forum Activity
« Last post by JRS on March 05, 2021, 03:09:04 PM »
Quote from: Theo@JRS
The "Latest in progress" Button on the oxygen site does lead into nowhere.
Maybe the site needs an update?

Works for me. (click wizard)
Theo needs to fix his PHP deprecation errors and lock down the forum so its members aren't added to spam DBs.
98
Open Forum / Re: Forum Activity
« Last post by JRS on March 05, 2021, 01:02:34 PM »
Seeing posts without ban complaints must mean I've disabled enough of the OWASP rules to make things functional. Don't be shy and let me know if you run into anything else that seems weird.
99
Open Forum / Re: Forum Activity
« Last post by Charles Pegge on March 05, 2021, 10:37:26 AM »
Nothing specific. I mean, occasionally,  it won't refresh a current page.
100
Open Forum / Re: Forum Activity
« Last post by Brian Alvarez on March 05, 2021, 07:47:34 AM »
Quote from: Charles Pegge on March 04, 2021, 12:01:13 PM
Hi John, I see the occasional 'offline' but it doesn't last long.

 Does that happen when you do something in particular? Chances are you are being banned as well.
Pages: 1 ... 8 9 [10]