Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Select doesn't produce an array
Message
De
31/10/2008 19:25:16
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Base de données, Tables, Vues, Index et syntaxe SQL
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Vista
Network:
Windows 2008 Server
Database:
MS SQL Server
Divers
Thread ID:
01358484
Message ID:
01358821
Vues:
11
Thanks to all who responded to this.

>Returning arrays make sense in class methods only because array has to exist at the point where returned array is assigned to another array.
>
>oDI = CREATEOBJECT("DbcInfo")
>
>dbc2Convert = "C:\Program Files\Microsoft Visual FoxPro 9\Samples\Northwind\northwind.dbc"
>
>aTables = oDI.GetDBCTableNames(dbc2Convert)
>for i = 1 to alen(aTables)
>	? aTables(i)
>next
>RETURN 
>
>DEFINE CLASS DbcInfo AS Custom
>	DIMENSION laTables[1]
>	function GetDBCTableNames()
>		lparameters myDBC
>		select objectname as tablename ;
>			from (myDBC) ;
>			where objecttype = "Table" ;
>			into array This.laTables
>		return @This.laTables
>ENDDEFINE
>
>>Given the below:
>>
>>dbc2Convert = "\\tpdfiles\data\dfreeman\tip\data\rta\rta.dbc"
>>aTables = GetDBCTableNames(dbc2Convert)
>>for i = 1 to alen(aTables)
>>? aTables(i)
>>next
>>
>>**************************************************************************
>>function GetDBCTableNames()
>>lparameters myDBC
>>select objectname as tablename ;
>>from (myDBC) ;
>>where objecttype = "Table" ;
>>into array A1
>>return A1
>>
>>Why do I get an error that says A1 is not an array? The select produces 6 records.
>>
>>Thanks
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform