General information
Category:
Coding, syntax & commands
I would like to write these codes in VB
1 – open a VFP table (independent table and table in a database)
if not used(“mytable”)
use mytable in 0
endif
select mytable
2 – search a record in a table
locate for xfield=xvar
if found()
endif
3 – Write in a table
replace xfield with xvar
4 – name of the computer
xmac=alltr(sys(0))
xmac=upper(alltr(substr(xmac,1,at('#',xmac)-1)))
5 – create a table or cursor
CREATE CURSOR csResult (field1 I)
CREATE table csResult (field1 I)
6 – scan a table
select mytable
scan
endscan
7 – does a file exist
if file(“c:\myfile.dbf”)
endif
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only