-----------------------------------------------------------------------
名次 学号 成绩 学籍号 姓名 班级 备注
------------------------------------------------------------------------
1 1 100 1301 张三 初三1班
2 2 86 1302 王张二 初三5班
3 4 3 13010 李四 初三12班
文本文件中内容如上。请问如何将上内容读取,并写入数据库(以上述第二行为字段名),一、三行跳过
------解决方案--------------------------------------------------------
CREATE CURSOR cname (名次 c(4),学号 c(4),成绩 c(4),学籍号 c(4),姓名 c(8),班级 c(10), 备注 m)
APPEND FROM wb.txt DELIMITED WITH BLANK
BROWSE
------解决方案--------------------------------------------------------
1。
appe from ... type deli
2.
fopen()
fputs()
fread()
...
------解决方案--------------------------------------------------------
------解决方案--------------------------------------------------------
上传到:http://www.access911.net/csdn/index.asp?old=2012-4-1
注明上传人
------解决方案--------------------------------------------------------
以下以上传的1.txt为测试文件
- C/C++ code
Clear Set Safety Off CREATE CURSOR cname (名次 c(4),学号 c(4),成绩 c(4),学籍号 c(4),姓名 c(10),班级 c(10), 备注 m)lcFileString = Filetostr('1.txt')Do While At(" ",lcFileString) != 0 lcFileString = Strtran(lcFileString,' ',' ')Enddo Set Memowidth To 1024lnLine = Memlines(lcFileString)If lnLine - 1 > 5 Strtofile("","k.txt") For i = 6 To lnLine - 1 Strtofile(Mline(lcFileString,i) + Chr(13) + Chr(10),'k.txt',1) Next Append From k.txt Delimited With Blank Delete File k.txtEndif Browse
------解决方案--------------------------------------------------------
建议把文本文件中的空格改成[,],然后,1, 1, 100, 1301, 张三, 初三1班
然后用2楼的方法,把blank 改成 逗号的那种。你可以参考帮助文件appe from
------解决方案--------------------------------------------------------
------解决方案--------------------------------------------------------
16楼代码更改如下:
MFILE=FILETOSTR("wb.txt")
FOR I=6 TO MEMLINES(MFILE)
?MLINE(MFILE,I)
ENDFOR
------解决方案--------------------------------------------------------
SET MEMOWIDTH设置情况