Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Alias not found
Message
De
21/07/2004 05:49:13
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Alias not found
Divers
Thread ID:
00926486
Message ID:
00926486
Vues:
77
hi all,

i get the message (alias not found), any help

this is the code.
*****************
SET TALK OFF
SET ECHO off
GETDIR()
thisform.text1.Value=GETFILE()

SET DEFAULT TO e:\samerqda

LOCAL lcTableName

lcTableName = thisform.text2.value

CREATE TABLE &lcTableName (char1 C(10), char2 C(70),char3 C(10), char4 C(10),char5 C(10), char6 C(40),char7 C(10), char8 C(10),char9 C(10), char10 C(70),char11 C(10), char12 C(10),char13 C(10), char14 C(40),char15 C(10), char16 C(10),char17 C(10), char18 C(70),char19 C(10), char20 C(10),char21 C(10), char22 C(40),char23 C(10), char24 C(10),char25 C(10), char26 C(70),char27 C(10), char28 C(10) NOCPTRANS)
APPEND FROM (thisform.text1.value)TYPE XLS
******************************************

USE (thisform.text2.value) exclusive
index on char9 tag char9
select sys(2015) as SortOrder,* from (thisform.text2.value) ;
order by 1 descending ;
into cursor crsTemp nofilter

select (thisform.text2.value)&&&alias not found
zap
select crsTemp
scan
if !seek(char9 ,'(thisform.text2.value)','char9 ')
scatter memvar memo
insert into (thisform.text2.value) from memvar
endif
endscan
brow
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform