我这个问题怎么解决啊！请各位高手帮助菜鸟这个忙！我将分数全部送出！谢谢了！

[ljzhost]

在文本中有这样的数据内容
姓名 学号 性别
fbwt 983415 男
hou 983411 女
请问怎么从文本中一个一个读出，然后写到数据库中呢？谢谢！

[emilcy]

ACCESS可以导入

[wangchong]

dim st() as string
st() = split("取出的行"，“ ”）
st(0) ="fbwt"
st(0) = "男"
。。。。。。。。。。。。

[little_hero]

同意！

[liuyunfeidu]

用ADO控件应该可以直接读入的。具体我没有应用过，所以不是很清楚。你可以试试的。

[zhengcai]

'读文本
dim value as string
dim value(1 to 3) as sring
open filename for input as #27
line input #27,value
close #27
'value 为一行文本内容，重复上面即可读接下去的一行。
'分析文本
dim i as integer
dim j as integer
dim n as integer
dim k as boolean
n=1
k=false
j=1
for i=1 to len(value)
if mid(value,i,1)<>0 then
k=true
else
if k then
value(j)=mid(value,n,i-1)
n=i-1
k=false
j=j+1
else
n=n+1
end if
end if
next i

'写到数据库
'先定义Adodc控件
adodc.recordset.addnew
adodc.recordset!name=value(1)
adodc.recordset!number=value(2)
adodc.recordset!sex=value(3)
adodc.recordset.update

[BillChang]

gz

[moonbaby]

gz

[tangbei]

行读取文本文件，然后使用split函数，取得以" "为分隔符的内容，再用insert into语句写入数据库中不就得了？

[blp]

每读取一行，根据每个字段的位置规则，取得每个字段的值，
然后用INSERT INTO语句写入数据库

[joo]

用split函数