编程论坛 → VFP论坛

文件不存在!

sarge_xp 发布于 2021-04-18 19:56， 2849 次点击

SET DEFAULT TO C:\class\DATA
SET TALK OFF
SET SAFETY OFF
PRIVATE ux

M_FILE=GETFILE('TXT','原始数据表')

ux= JUSTFNAME(M_FILE)
? M_FILE
? ux
IF M_FILE=" "
   =MESSAGEBOX("请选择待导入的文件！",0+48,"提示")
   RETURN
ELSE
   IF JUSTEXT(M_FILE)#"TXT"  &&获得文件扩展名
      =MESSAGEBOX("您选择的不是TXT文档！",0+48,"提示")
      RETURN
   ENDIF
ENDIF

CREATE CURSOR TEM (代码 C(30),姓名 C(10))
APPEND FROM ux DELIMITED WITH TAB

打开相应文件后，显示它的全名及文件都正常，在最后一句出错，是什么原因呢？

只有本站会员才能查看附件，请登录

16 回复

#2

瓜瓜19902021-04-18 20:48

最后一句的 ux 要用()括起来.文本里不是用tab间隔的.

[此贴子已经被作者于2021-4-18 20:50编辑过]

#3

sarge_xp2021-04-19 02:26

回复 2楼瓜瓜1990

APPEND FROM (ux) DELIMITED WITH TAB

是这样吗？

#4

sdta2021-04-19 09:06

APPEND FROM (UX) DELIMITED WITH BLANK

#5

sarge_xp2021-04-19 16:19

回复 4楼 sdta

只有本站会员才能查看附件，请登录

还是出错，卡住了

#6

sdta2021-04-19 16:29

上传真实文件

#7

吹水佬2021-04-19 18:22

回复 5楼 sarge_xp

点“挂起”看看是哪一行

#8

sarge_xp2021-04-19 20:03

回复 7楼吹水佬

APPEND FROM (ux) DELIMITED WITH TAB

#9

sarge_xp2021-04-19 20:03

回复 6楼 sdta

已经上传了

#10

sdta2021-04-19 20:24

以下是引用sarge_xp在2021-4-19 20:03:25的发言：

已经上传了

只有本站会员才能查看附件，请登录

这是真实文件？

#11

xuminxz2021-04-19 20:51

ux= JUSTFNAME(M_FILE)
这可能有问题，如果文件不在当前文件夹下，会报错。直接用
APPEND FROM &M_FILE. DELIMITED WITH TAB

#12

sarge_xp2021-04-20 04:25

回复 10楼 sdta

目前是，将来学生的数量会增加，但也是这样的数据结构；通过apend from 汇入总表，就这一语句出问题

#13

shenkj0012021-04-20 08:29

CREATE CURSOR TEM (代码 C(3),姓名 C(10))
APPEND FROM &ux SDF

#14

mywisdom882021-04-20 08:38

以下是引用sarge_xp在2021-4-19 16:19:54的发言：

还是出错，卡住了

查看一下，你UX的值
?ux

#15

wengjl2021-04-20 09:52

以下是引用sarge_xp在2021-4-20 04:25:11的发言：

目前是，将来学生的数量会增加，但也是这样的数据结构；通过apend from 汇入总表，就这一语句出问题

你把EXCEL数据发上来，抽空给你做一个

#16

sarge_xp2021-04-20 20:27

回复 14楼 mywisdom88

Ux 值没问题的，程序上都显示出来了

#17

XUFN2021-04-26 14:30

VFP最后的阵地

1