Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
File not open error
Message
 
À
10/12/2001 03:47:51
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Divers
Thread ID:
00590976
Message ID:
00592421
Vues:
24
>>Nope.
>Then do :)
>Cetin


Still no luck

I have this code
DEFINE CLASS PriceWS AS Custom OLEPUBLIC 	
	isOpen= .F.
	cDir= ""
	oDS= .F.
	
	FUNCTION Init
		LOCAL oINI AS IniAccess OF PriceWS, ;
			cDir AS String
		SET CLASSLIB TO PriceWS
		SET DATE TO BRITISH
		SET RESOURCE OFF
		SET EXCLUSIVE OFF
		SET CPDIALOG OFF
		SET DELETED ON
		SET EXACT OFF
		SET SAFETY OFF
		SET REPROCESS TO 2 SECONDS
		this.oDS= CREATEOBJECT("Session")
		SET DATASESSION TO this.oDS.DataSessionID
		oINI= CREATEOBJECT("IniAccess")
		oINI.getinientry(@cDir, "MySection", "Dir", "MyIni.ini")
		m.cDir= ADDBS(m.cDir)
		IF !EMPTY(m.cDir)
			this.cDir = m.cDir
			this.isOpen= .T.
			USE (m.cDir + "MyTable.dbf") IN 0 SHARED ORDER MyOrder
		ENDIF
	ENDFUNC
	
	FUNCTION getString AS String
		RETURN "String"
	ENDFUNC
	
ENDDEFINE


Any Ideas?
All files and the like exist, and all code works in the command window.
When attempting to create an instance it say Class Factory can not provide the class.
If I comment out
USE (m.cDir + "MyTable.dbf") IN 0 SHARED ORDER MyOrder
Then it instanciates fine
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform