1. RE: TBrowse

It looks like tlbinf32.dll isn't properly installed on your system.  TBrowse
tries to move it to c:\windows\system if it can't find the file.  I suppose
if you're running a higher version of windows, the folders are named
differently (c:\winnt\system32).  The solution should be to move the file to
that directory, and it should come up.

Matt Lewis 

-----Original Message-----
From: ShelbySue at granbury.com [mailto:ShelbySue at granbury.com]
Subject: TBrowse



I am attempting to run tbrowse and encountering the following ex.err file.
I have read some list emails that mention errors but they appearred old and
no real resolutions.

I have downloaded the 2.0 zip file from Mr. Lewis' web site.  (Actually has
1.3 in the eucom.ew file)

I finally found print.zip from RDS site.  I have tried the 55 win32lib and
the bleeding edge version.

I was attempting to do the modification to run MSAccess97 (msacc8.olb wrap)
but was derailed before I began. I am very new at this.  Perhaps you all
have already seen this error and know exactly what I don't have right?  

BTW - my .chm file also crashes and won't run....


TOP OF EX.ERR FILE
C:\EuphoriaProgramming\com\EuCOM.ew:506 in function call_interface() 
subscript value 0 is out of bounds, reading from a sequence of length 0 
    obj_ix = 0
    iid = 2
    iid_func = 5
    args = {7741600,7741636,1,1003,7741696}
    iid_ix = 2
    ci_ix = <no value>
    vtbl = <no value>
    this = <no value>

... called from C:\EuphoriaProgramming\com\tlbinf32.ew:145 in function
getidsofnames()  
    obj_ix = 0
    dispnames = {{67'C',108'l',97'a',115's',115's',73'I',110'n',102'f',
111'o',70'F',114'r',111'o',109'm',79'O',98'b',106'j',101'e',99'c',116't'}}
    c = 1
    rgszNames = 7741636
    rgDispId = 7741696
    mset = 7741620
    ok = <no value>
    dispid = <no value>
    i = 1

... called from C:\EuphoriaProgramming\com\tlbinf32.ew:179 in procedure
init_tliapplication()  
    obj_ix = 0

TRACE PORTION OF EX.ERR FILE
C:\EuphoriaProgramming\com\EuCOM.ew:1144     ppv = acquire_mem( mset, 4 )
C:\EuphoriaProgramming\com\EuCOM.ew:1145     rclsid = acquire_mem( mset,
clsid_table[CLSID_BYTES][clsid_ix] )
C:\EuphoriaProgramming\com\EuCOM.ew:1146     riid = acquire_mem( mset,
iid_table[IID_BYTES][1] )
C:\EuphoriaProgramming\com\EuCOM.ew:1148     ok = c_func( CoCreateInstance,
{ rclsid, 0 , 5, riid, ppv } )
C:\EuphoriaProgramming\com\EuCOM.ew:1150     if not ok then
C:\EuphoriaProgramming\com\EuCOM.ew:1153         print_com_error( sprintf(
"CoCreateInstance Error: %x\n",ok))
C:\EuphoriaProgramming\com\EuCOM.ew:1154         obj_ix = 0
C:\EuphoriaProgramming\com\EuCOM.ew:1157     release_mem( mset )
C:\EuphoriaProgramming\com\EuCOM.ew:1158     return obj_ix
C:\EuphoriaProgramming\com\EuCOM.ew:1143     mset = new_memset()
C:\EuphoriaProgramming\com\EuCOM.ew:1144     ppv = acquire_mem( mset, 4 )
C:\EuphoriaProgramming\com\EuCOM.ew:1145     rclsid = acquire_mem( mset,
clsid_table[CLSID_BYTES][clsid_ix] )
C:\EuphoriaProgramming\com\EuCOM.ew:1146     riid = acquire_mem( mset,
iid_table[IID_BYTES][1] )
C:\EuphoriaProgramming\com\EuCOM.ew:1148     ok = c_func( CoCreateInstance,
{ rclsid, 0 , 5, riid, ppv } )
C:\EuphoriaProgramming\com\EuCOM.ew:1150     if not ok then
C:\EuphoriaProgramming\com\EuCOM.ew:1153         print_com_error( sprintf(
"CoCreateInstance Error: %x\n",ok))
C:\EuphoriaProgramming\com\EuCOM.ew:1154         obj_ix = 0
C:\EuphoriaProgramming\com\EuCOM.ew:1157     release_mem( mset )
C:\EuphoriaProgramming\com\EuCOM.ew:1158     return obj_ix
C:\EuphoriaProgramming\com\tlbinf32.ew:174     if tliapplication_init then
C:\EuphoriaProgramming\com\tlbinf32.ew:177     tliapplication_init = 1
C:\EuphoriaProgramming\com\tlbinf32.ew:179     tiam_ClassInfoFromObject =
getidsofnames( obj_ix, { "ClassInfoFromObject" } )
C:\EuphoriaProgramming\com\EuCOM.ew:496     if sequence( iid ) then
C:\EuphoriaProgramming\com\EuCOM.ew:502         iid_ix = iid
C:\EuphoriaProgramming\com\EuCOM.ew:506     ci_ix =
obj_table[OBJ_CLSID_IX][obj_ix]



Joe and Audrey Phillips 
Granbury, TX 
            


TOPICA - Start your own email discussion group. FREE!

new topic     » topic index » view message » categorize

2. RE: TBrowse

Actually, let me elaborate.  Here's the code at the top of tbrowse:

void = open_dll( "tlbinf32.dll" )
if not void then
    void = moveFile( "_tlbinf32.dll", "c:\\windows\\system\\tlbinf32.dll")
    void = open_dll( "tlbinf32.dll" )
    void = define_c_proc( void, "DLLRegisterServer", {} )
    c_proc( void, {} )
end if

Make sure that "_tlbinf32.dll" is in the same folder as tbrowse, and change
the line to:
    void = moveFile( "_tlbinf32.dll", "c:\\winnt\\system32\\tlbinf32.dll")
[assuming that winnt\\system32 is the correct directory for your system.

Matt Lewis 

-----Original Message-----
From: ShelbySue at granbury.com [mailto:ShelbySue at granbury.com]
Sent: Saturday, January 11, 2003 5:00 PM
To: EUforum
Subject: TBrowse



I am attempting to run tbrowse and encountering the following ex.err file.
I have read some list emails that mention errors but they appearred old and
no real resolutions.

I have downloaded the 2.0 zip file from Mr. Lewis' web site.  (Actually has
1.3 in the eucom.ew file)

I finally found print.zip from RDS site.  I have tried the 55 win32lib and
the bleeding edge version.

I was attempting to do the modification to run MSAccess97 (msacc8.olb wrap)
but was derailed before I began. I am very new at this.  Perhaps you all
have already seen this error and know exactly what I don't have right?  

BTW - my .chm file also crashes and won't run....


TOP OF EX.ERR FILE
C:\EuphoriaProgramming\com\EuCOM.ew:506 in function call_interface() 
subscript value 0 is out of bounds, reading from a sequence of length 0 
    obj_ix = 0
    iid = 2
    iid_func = 5
    args = {7741600,7741636,1,1003,7741696}
    iid_ix = 2
    ci_ix = <no value>
    vtbl = <no value>
    this = <no value>

... called from C:\EuphoriaProgramming\com\tlbinf32.ew:145 in function
getidsofnames()  
    obj_ix = 0
    dispnames = {{67'C',108'l',97'a',115's',115's',73'I',110'n',102'f',
111'o',70'F',114'r',111'o',109'm',79'O',98'b',106'j',101'e',99'c',116't'}}
    c = 1
    rgszNames = 7741636
    rgDispId = 7741696
    mset = 7741620
    ok = <no value>
    dispid = <no value>
    i = 1

... called from C:\EuphoriaProgramming\com\tlbinf32.ew:179 in procedure
init_tliapplication()  
    obj_ix = 0

TRACE PORTION OF EX.ERR FILE
C:\EuphoriaProgramming\com\EuCOM.ew:1144     ppv = acquire_mem( mset, 4 )
C:\EuphoriaProgramming\com\EuCOM.ew:1145     rclsid = acquire_mem( mset,
clsid_table[CLSID_BYTES][clsid_ix] )
C:\EuphoriaProgramming\com\EuCOM.ew:1146     riid = acquire_mem( mset,
iid_table[IID_BYTES][1] )
C:\EuphoriaProgramming\com\EuCOM.ew:1148     ok = c_func( CoCreateInstance,
{ rclsid, 0 , 5, riid, ppv } )
C:\EuphoriaProgramming\com\EuCOM.ew:1150     if not ok then
C:\EuphoriaProgramming\com\EuCOM.ew:1153         print_com_error( sprintf(
"CoCreateInstance Error: %x\n",ok))
C:\EuphoriaProgramming\com\EuCOM.ew:1154         obj_ix = 0
C:\EuphoriaProgramming\com\EuCOM.ew:1157     release_mem( mset )
C:\EuphoriaProgramming\com\EuCOM.ew:1158     return obj_ix
C:\EuphoriaProgramming\com\EuCOM.ew:1143     mset = new_memset()
C:\EuphoriaProgramming\com\EuCOM.ew:1144     ppv = acquire_mem( mset, 4 )
C:\EuphoriaProgramming\com\EuCOM.ew:1145     rclsid = acquire_mem( mset,
clsid_table[CLSID_BYTES][clsid_ix] )
C:\EuphoriaProgramming\com\EuCOM.ew:1146     riid = acquire_mem( mset,
iid_table[IID_BYTES][1] )
C:\EuphoriaProgramming\com\EuCOM.ew:1148     ok = c_func( CoCreateInstance,
{ rclsid, 0 , 5, riid, ppv } )
C:\EuphoriaProgramming\com\EuCOM.ew:1150     if not ok then
C:\EuphoriaProgramming\com\EuCOM.ew:1153         print_com_error( sprintf(
"CoCreateInstance Error: %x\n",ok))
C:\EuphoriaProgramming\com\EuCOM.ew:1154         obj_ix = 0
C:\EuphoriaProgramming\com\EuCOM.ew:1157     release_mem( mset )
C:\EuphoriaProgramming\com\EuCOM.ew:1158     return obj_ix
C:\EuphoriaProgramming\com\tlbinf32.ew:174     if tliapplication_init then
C:\EuphoriaProgramming\com\tlbinf32.ew:177     tliapplication_init = 1
C:\EuphoriaProgramming\com\tlbinf32.ew:179     tiam_ClassInfoFromObject =
getidsofnames( obj_ix, { "ClassInfoFromObject" } )
C:\EuphoriaProgramming\com\EuCOM.ew:496     if sequence( iid ) then
C:\EuphoriaProgramming\com\EuCOM.ew:502         iid_ix = iid
C:\EuphoriaProgramming\com\EuCOM.ew:506     ci_ix =
obj_table[OBJ_CLSID_IX][obj_ix]



Joe and Audrey Phillips 
Granbury, TX 
            


TOPICA - Start your own email discussion group. FREE!

new topic     » goto parent     » topic index » view message » categorize

3. RE: TBrowse

> From: ShelbySue at granbury.com [mailto:ShelbySue at granbury.com]

> Thanks for you response (Matt) regarding TBrowse.  Actually, the
> registration was not working for the tlbinf32.dll in tbrowse. 
> It was in the
> system directory.  I just registered it manually with regsvr32 and the
> program runs fine.
> 
> BTW - You were right.  Access 97 works great (So far.)   
> Tbrowse did create
> some reg_com_eventsink lines without any events to register. 
> This caused an
> run-time error (to few parameters).  I just commented out 
> these lines from
> msacc8.ew

Glad you got it working!  Let me know if you have any other problems.  I
haven't gotten a lot of feedback on EuCOM in general, so it's probably still
pretty rough.  I'm very open to suggestions on how to make it easier to use
or give it more functionality.

Matt Lewis

new topic     » goto parent     » topic index » view message » categorize

4. RE: TBrowse

> From: jordah at btopenworld.com [mailto:jordah at btopenworld.com]

> How about making an update as soon as possible having proper 
> help docs. By
> proper, i mean something similar to the chm file it used to have;

I've started converting it to win32lib style docs.  That seems to be the
most painless and useful way.  I'll put the results on my web page when I
get them finished (hopefully sometime next week).

Matt Lewis

new topic     » goto parent     » topic index » view message » categorize

Search



Quick Links

User menu

Not signed in.

Misc Menu