Question

求高手做个简单的VF写出以下命令，并在命令窗口中验证 1. 创建“数据库”文件“XS.dbc”输入此命令后，在默认路径下

Answer 1

SET SAFETY OFF

CLOSE DATABASES ALL

&& 1

CREATE DATABASE "XS.dbc"

OPEN DATABASE "XS.dbc"

&& 2

CREATE TABLE XS (学号 C(12), 姓名 C(6), 系别 C(10), 成绩 N(5))

USE IN XS

&& 3

USE XS IN 0 EXCLUSIVE

INSERT INTO XS(学号, 姓名, 系别, 成绩) VALUES ("001", "张三", "工商系", 78)

INSERT INTO XS(学号, 姓名, 系别, 成绩) VALUES ("002", "李四", "工商系", 98)

INSERT INTO XS(学号, 姓名, 系别, 成绩) VALUES ("003", "王五", "外语系", 67)

INSERT INTO XS(学号, 姓名, 系别, 成绩) VALUES ("004", "赵六", "艺术系", 84)

INSERT INTO XS(学号, 姓名, 系别, 成绩) VALUES ("005", "吴七", "工商系", 80)

BROWSE

&& 4

LOCATE FOR 姓名 = "王五"

REPLACE 系别 WITH "工商系"

BROWSE

&& 5

LOCATE FOR 学号 = "004"

DELETE

PACK

BROWSE

&& 6

SELECT * FROM XS INTO CURSOR "curSQL"

BROWSE

&& 7

SELECT 学号, 姓名, 成绩 FROM XS INTO CURSOR "curSQL"

BROWSE

&& 8

SELECT * FROM XS WHERE 系别="工商系" INTO CURSOR "curSQL"

BROWSE

&& 9

SELECT * FROM XS WHERE 系别="工商系" AND 成绩>90 INTO CURSOR "curSQL"

BROWSE

&& 10

SELECT * FROM XS WHERE 成绩 BETWEEN 80 AND 90 INTO CURSOR "curSQL"

BROWSE