IUNKNOWN:RELEASE

This is a discussion on IUNKNOWN:RELEASE within the Clipper forums in Programming Languages category; Hi: I linked succefully CAVO with Excell , using MyXL97 classes. I run my VoApps on my computers and several computers without getting trouble, but, on some Comps I get IUNKNOWN:RELEASE 5333 error or some others derived from Excell file building. I have Vo2.7 2074 version and my progs run fine on Vista and XP . I'd appreciate your help 'cause I can't get the origin of this problem. Tia Ed.Solano...
Go Back   Application Development Forum > Programming Languages > Clipper
IUNKNOWN:RELEASE IUNKNOWN:RELEASE

Object Mix

 Register FAQ Calendar Search Today's Posts Mark Forums Read
Reply

 

LinkBack Thread Tools Display Modes
  #1  
Old 08-28-2008, 12:35 PM
edgsun
Guest
  
Default IUNKNOWN:RELEASE
Hi:

I linked succefully CAVO with Excell , using MyXL97 classes.
I run my VoApps on my computers and several computers without getting
trouble, but,
on some Comps I get IUNKNOWN:RELEASE 5333 error or some others
derived from Excell file building.
I have Vo2.7 2074 version and my progs run fine on Vista and XP .

I'd appreciate your help 'cause I can't get the origin of this
problem.

Tia

Ed.Solano
Reply With Quote
  #2  
Old 08-28-2008, 06:41 PM
Stephen Quinn
Guest
  
Default Re: IUNKNOWN:RELEASE
Ed

----> MyXL97 classes

Have you tested Excel files created with versions 98-2007 with your
classes??

CYA
Steve


Reply With Quote
  #3  
Old 09-02-2008, 06:50 AM
edgsun
Guest
  
Default Re: IUNKNOWN:RELEASE
On Aug 28, 5:41*pm, "Stephen Quinn" <stevej...@SPbigpond.AMnet.au>
wrote:
> Ed
>
> ----> MyXL97 classes
>
> Have you tested Excel files created with versions 98-2007 with your
> classes??
>
> CYA
> Steve

Hi Steve:

It seems it is due to a memory issue because I ever find memory Excel
fossils every time the error comes.
So, I kill the Excel object instance in my program when I end its
running.
I advise user to kill Excel fossils via Task Manager after leaving
Excel sessions.

Many thanks to You.

Regards

Ed

Reply With Quote
  #4  
Old 09-02-2008, 10:54 AM
Gerhard Bunzel
Guest
  
Default Re: IUNKNOWN:RELEASE
Hi Ed,

have a look at this DLL for creating Excel files without Excel.
http://www.sm-software.com/

It's easy to use, very fast, and creates very large files without any
problem.
....and it's only 235$ for a 'Distribution License' to distribute the product
as a part of your software

You can get a full working demo version.


HTH

Gerhard



"edgsun" <edgsun@gmail.com> schrieb im Newsbeitrag
news:cfdbde64-8b33-4ce9-bdea-7523e10f6592@f36g2000hsa.googlegroups.com...
> Hi:
>
> I linked succefully CAVO with Excell , using MyXL97 classes.
> I run my VoApps on my computers and several computers without getting
> trouble, but,
> on some Comps I get IUNKNOWN:RELEASE 5333 error or some others
> derived from Excell file building.
> I have Vo2.7 2074 version and my progs run fine on Vista and XP .
>
> I'd appreciate your help 'cause I can't get the origin of this
> problem.
>
> Tia
>
> Ed.Solano


Reply With Quote
  #5  
Old 09-07-2008, 12:05 PM
edgsun
Guest
  
Default Re: IUNKNOWN:RELEASE
On Sep 2, 9:54*am, "Gerhard Bunzel" <G.Bun...@domonet.de> wrote:

Hi Gherard

Many thanks for your advice.I'll try it.

Actually I need to create several sheets, more than 3 default sheets
Excel has.

The question is my code creates the number of sheets I need, but it
works fine on first and second sheets but excell only adds following
shhets data onto third sheet leaving empty the next.

Here is my code:

This method is supposed to create a new sheet and header.

METHOD CambiarHoja(sVidrio,aSortKids,nHoja,sTitGen) CLASS
ConsumosSeparWindow
LOCAL
aTitul:={'Interlayer','Código','Factura','P.O.','A rea','Descripción'}
AS ARRAY
LOCAL nx AS DWORD
LOCAL sTexto AS STRING

IF nHoja>3
SELFWkSheets:Add ()
ENDIF
SELFWkSheet :=xlWorkSheet{ SELFWkSheets:[Item, nHoja] }
SELFWkSheet:Activate()
SELFWkSheet:Name :=sTitGen //name of the tabsheet

SELFRange :=xlRange{ SELFWkSheet:[Range, "A1", "A1"] }
SELFRange:FormulaR1C1 :="wSigger Gestión de Existencias
"+DToC(Today())
SELFRange:ColumnWidth :=15

SELFRange :=xlRange{ SELFWkSheet:[Range, "A2", "A2"] }
SELFRange:FormulaR1C1 :=sNom+' '+sNit
SELFRange:ColumnWidth :=15

SELFRange :=xlRange{ SELFWkSheet:[Range, "A3", "A3"] }
SELFRange:FormulaR1C1 :=sTitulo
SELFRange:ColumnWidth :=15

SELFRange :=xlRange{ SELFWkSheet:[Range, "A1", "A3"] }
SELFRange:Font:Bold :=TRUE
SELFRange:Font:Italic :=TRUE
SELFRange:Borders:ColorIndex :=1
SELFRange:VerticalAlignment :=1 // xlTop


FOR nX := 1 UPTO ALen(aTitul)
sTexto := aTitul[nX]
SELFRange :=SELFWkSheet:[Cells, 6, nX ]
SELFRange:FormulaR1C1 := sTexto
NEXT


SELFRange :=xlRange{ SELFWkSheet:[Range, "A6", "G6"] }
SELFRange:Font:Bold :=TRUE
SELFRange:Font:Italic :=TRUE
SELFRange:Borders:ColorIndex :=1
SELFRange:VerticalAlignment :=1 // xlTop
RETURN NIL

************************************************

Tia Ed........sheat!!!
> Hi Ed,
>
> have a look at this DLL for creating Excel files without Excel.http://www..sm-software.com/
>
> It's easy to use, very fast, and creates very large files without any
> problem.
> ...and it's only 235$ for a 'Distribution License' to distribute the product
> as a part of your software
>
> You can get a full working demo version.
>
> HTH
>
> Gerhard
>
> "edgsun" <edg...@gmail.com> schrieb im Newsbeitragnews:cfdbde64-8b33-4ce9-bdea-7523e10f6592@f36g2000hsa.googlegroups.com...
>
>
>
> > Hi:
>
> > I linked succefully CAVO with Excell , using MyXL97 classes.
> > I run my VoApps on my computers and several computers without getting
> > trouble, but,
> > on some Comps I get *IUNKNOWN:RELEASE 5333 error or some others
> > derived from Excell file building.
> > *I have *Vo2.7 2074 version *and *my progs run fine on Vista and XP .
>
> > I'd appreciate your help 'cause I can't get the *origin of this
> > problem.
>
> > Tia
>
> > Ed.Solano- Hide quoted text -
>
> - Show quoted text -

Reply With Quote
  #6  
Old 09-08-2008, 05:58 AM
Gerhard Bunzel
Guest
  
Default Re: IUNKNOWN:RELEASE
Hi Edgsun,

you can set the number of sheets in an new workbook:
oMyExcel:SheetsInNewWorkbook := 6

Set this number before you you anything with workbook or sheets.

HTH

Gerhard


"edgsun" <edgsun@gmail.com> schrieb im Newsbeitrag
news:3a7d87a2-84b9-4142-9234-861985f6b836@t54g2000hsg.googlegroups.com...
On Sep 2, 9:54 am, "Gerhard Bunzel" <G.Bun...@domonet.de> wrote:

Hi Gherard

Many thanks for your advice.I'll try it.

Actually I need to create several sheets, more than 3 default sheets
Excel has.

The question is my code creates the number of sheets I need, but it
works fine on first and second sheets but excell only adds following
shhets data onto third sheet leaving empty the next.

Here is my code:

This method is supposed to create a new sheet and header.

METHOD CambiarHoja(sVidrio,aSortKids,nHoja,sTitGen) CLASS
ConsumosSeparWindow
LOCAL
aTitul:={'Interlayer','Código','Factura','P.O.','A rea','Descripción'}
AS ARRAY
LOCAL nx AS DWORD
LOCAL sTexto AS STRING

IF nHoja>3
SELFWkSheets:Add ()
ENDIF
SELFWkSheet :=xlWorkSheet{ SELFWkSheets:[Item, nHoja] }
SELFWkSheet:Activate()
SELFWkSheet:Name :=sTitGen //name of the tabsheet

SELFRange :=xlRange{ SELFWkSheet:[Range, "A1", "A1"] }
SELFRange:FormulaR1C1 :="wSigger Gestión de Existencias
"+DToC(Today())
SELFRange:ColumnWidth :=15

SELFRange :=xlRange{ SELFWkSheet:[Range, "A2", "A2"] }
SELFRange:FormulaR1C1 :=sNom+' '+sNit
SELFRange:ColumnWidth :=15

SELFRange :=xlRange{ SELFWkSheet:[Range, "A3", "A3"] }
SELFRange:FormulaR1C1 :=sTitulo
SELFRange:ColumnWidth :=15

SELFRange :=xlRange{ SELFWkSheet:[Range, "A1", "A3"] }
SELFRange:Font:Bold :=TRUE
SELFRange:Font:Italic :=TRUE
SELFRange:Borders:ColorIndex :=1
SELFRange:VerticalAlignment :=1 // xlTop


FOR nX := 1 UPTO ALen(aTitul)
sTexto := aTitul[nX]
SELFRange :=SELFWkSheet:[Cells, 6, nX ]
SELFRange:FormulaR1C1 := sTexto
NEXT


SELFRange :=xlRange{ SELFWkSheet:[Range, "A6", "G6"] }
SELFRange:Font:Bold :=TRUE
SELFRange:Font:Italic :=TRUE
SELFRange:Borders:ColorIndex :=1
SELFRange:VerticalAlignment :=1 // xlTop
RETURN NIL

************************************************

Tia Ed........sheat!!!
> Hi Ed,
>
> have a look at this DLL for creating Excel files without
Excel.http://www.sm-software.com/
>
> It's easy to use, very fast, and creates very large files without any
> problem.
> ...and it's only 235$ for a 'Distribution License' to distribute the
product
> as a part of your software
>
> You can get a full working demo version.
>
> HTH
>
> Gerhard
>
> "edgsun" <edg...@gmail.com> schrieb im
Newsbeitragnews:cfdbde64-8b33-4ce9-bdea-7523e10f6592@f36g2000hsa.googlegroup
s.com...
>
>
>
> > Hi:
>
> > I linked succefully CAVO with Excell , using MyXL97 classes.
> > I run my VoApps on my computers and several computers without getting
> > trouble, but,
> > on some Comps I get IUNKNOWN:RELEASE 5333 error or some others
> > derived from Excell file building.
> > I have Vo2.7 2074 version and my progs run fine on Vista and XP .
>
> > I'd appreciate your help 'cause I can't get the origin of this
> > problem.
>
> > Tia
>
> > Ed.Solano- Hide quoted text -
>
> - Show quoted text -


Reply With Quote
  #7  
Old 09-10-2008, 07:24 AM
edgsun
Guest
  
Default Re: IUNKNOWN:RELEASE
On Sep 8, 4:58*am, "Gerhard Bunzel" <G.Bun...@domonet.de> wrote:
HI Gerhard:

It works as a swiss clock...

Many many thanks...

Ed

> Hi Edgsun,
>
> you can set the number of sheets in an new workbook:
> oMyExcel:SheetsInNewWorkbook := 6
>
> Set this number before you you anything with workbook or sheets.
>
> HTH
>
> Gerhard
>
> "edgsun" <edg...@gmail.com> schrieb im Newsbeitragnews:3a7d87a2-84b9-4142-9234-861985f6b836@t54g2000hsg.googlegroups.com...
> On Sep 2, 9:54 am, "Gerhard Bunzel" <G.Bun...@domonet.de> wrote:
>
> Hi Gherard
>
> Many thanks for your advice.I'll try it.
>
> Actually I need to create several sheets, more than 3 default sheets
> Excel has.
>
> The question is my code creates the number of sheets I need, but it
> works fine on first and second sheets but excell only adds following
> shhets data onto third sheet leaving empty the next.
>
> Here is my code:
>
> This method is supposed to create a new sheet and header.
>
> METHOD CambiarHoja(sVidrio,aSortKids,nHoja,sTitGen) CLASS
> ConsumosSeparWindow
> LOCAL
> aTitul:={'Interlayer','Código','Factura','P.O.','A rea','Descripción'}
> AS ARRAY
> LOCAL nx AS DWORD
> LOCAL sTexto AS STRING
>
> * * * * *IF nHoja>3
> * * * * * * SELFWkSheets:Add ()
> * * * * *ENDIF
> * * * * *SELFWkSheet :=xlWorkSheet{ SELFWkSheets:[Item, nHoja] }
> SELFWkSheet:Activate()
> SELFWkSheet:Name :=sTitGen //name of the tabsheet
>
> SELFRange :=xlRange{ SELFWkSheet:[Range, "A1", "A1"] }
> SELFRange:FormulaR1C1 :="wSigger * *Gestión de Existencias
> "+DToC(Today())
> SELFRange:ColumnWidth :=15
>
> SELFRange :=xlRange{ SELFWkSheet:[Range, "A2", "A2"] }
> SELFRange:FormulaR1C1 :=sNom+' '+sNit
> SELFRange:ColumnWidth :=15
>
> SELFRange :=xlRange{ SELFWkSheet:[Range, "A3", "A3"] }
> SELFRange:FormulaR1C1 :=sTitulo
> SELFRange:ColumnWidth :=15
>
> SELFRange :=xlRange{ SELFWkSheet:[Range, "A1", "A3"] }
> SELFRange:Font:Bold :=TRUE
> SELFRange:Font:Italic :=TRUE
> SELFRange:Borders:ColorIndex :=1
> SELFRange:VerticalAlignment :=1 // xlTop
>
> FOR nX := 1 UPTO ALen(aTitul)
> * * sTexto := aTitul[nX]
> * * * * * * *SELFRange :=SELFWkSheet:[Cells, 6, nX ]
> * * SELFRange:FormulaR1C1 := sTexto
> NEXT
>
> SELFRange :=xlRange{ SELFWkSheet:[Range, "A6", "G6"] }
> SELFRange:Font:Bold :=TRUE
> SELFRange:Font:Italic :=TRUE
> SELFRange:Borders:ColorIndex :=1
> SELFRange:VerticalAlignment :=1 // xlTop
> RETURN NIL
>
> ************************************************
>
> Tia Ed........sheat!!!> Hi Ed,
>
> > have a look at this DLL for creating Excel files without
>
> Excel.http://www.sm-software.com/
>
> > It's easy to use, very fast, and creates very large files without any
> > problem.
> > ...and it's only 235$ for a 'Distribution License' to distribute the
> product
> > as a part of your software
>
> > You can get a full working demo version.
>
> > HTH
>
> > Gerhard
>
> > "edgsun" <edg...@gmail.com> schrieb im
>
> Newsbeitragnews:cfdbde64-8b33-4ce9-bdea-7523e10f6592@f36g2000hsa.googlegroup
> s.com...
>
>
>
>
>
> > > Hi:
>
> > > I linked succefully CAVO with Excell , using MyXL97 classes.
> > > I run my VoApps on my computers and several computers without getting
> > > trouble, but,
> > > on some Comps I get IUNKNOWN:RELEASE 5333 error or some others
> > > derived from Excell file building.
> > > I have Vo2.7 2074 version and my progs run fine on Vista and XP .
>
> > > I'd appreciate your help 'cause I can't get the origin of this
> > > problem.
>
> > > Tia
>
> > > Ed.Solano- Hide quoted text -
>
> > - Show quoted text -- Hide quoted text -
>
> - Show quoted text -

Reply With Quote
Reply

« Previous Thread | Next Thread »

Thread Tools
Display Modes
Linear Mode Linear Mode


All times are GMT -5. The time now is 08:36 AM.

Privacy Statement -

Powered by vBulletin® Version 3.7.2
Copyright ©2000 - 2008, Jelsoft Enterprises Ltd.
Search Engine Optimization by vBSEO 3.2.0
vB Ad Management by =RedTyger=

In an effort to better serve ads to our visitors, cookies are used on objectmix.com. For more information, check out our Privacy Policy.