7,763
社区成员
发帖
与我相关
我的任务
分享请问 关于读excel
当我读excel表的时候
select * from [Sheet1$]
为什么只是从第二条记录开始读呢？
怎么样才能让他从第一条记录开始读呢？？
谢谢
select * from [Sheet1$]
为什么只是从第二条记录开始读呢？
怎么样才能让他从第一条记录开始读呢？？
谢谢
...全文
请发表友善的回复…
发表回复
myhgyp 2005-02-28
- 打赏
- 举报
读第一行：rs.fields(i).name
读第二行开始的某一行：rs(i)
读第二行开始的某一行：rs(i)
wqxu 2005-02-28
- 打赏
- 举报
rs.fields(i).name,来读第一行吧
viena 2005-02-28
- 打赏
- 举报
没有别的办法了~
pexi 2005-02-28
- 打赏
- 举报
有其他什么好的方法没有啊？
online 2005-02-21
- 打赏
- 举报
你可以考虑在excel中的第一行加字段，这样可以完全读出
如Test Test2 date1
1 1 2004-6-7
2 2 2004-6-7
3 3 2004-6-9
4 4 2004-6-7
5 5 2004-6-5
6 6 2004-6-7
7 7 2004-6-7
8 8 2004-6-7
9 9 2004-6-7
如Test Test2 date1
1 1 2004-6-7
2 2 2004-6-7
3 3 2004-6-9
4 4 2004-6-7
5 5 2004-6-5
6 6 2004-6-7
7 7 2004-6-7
8 8 2004-6-7
9 9 2004-6-7
yangao 2005-02-21
- 打赏
- 举报
第一行读出来了
是列名
是列名
samwzhang 2005-02-21
- 打赏
- 举报
嘿嘿，不用EXCEL Object，只能把第一行当作列名来读。
zmm004 2005-02-21
- 打赏
- 举报
不是呀
Set conn2 = CreateObject("adodb.connection")
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Text1.Text & "\概况\企业名称表.xls" & ";" & _
"Extended Properties=""Excel 8.0;HDR=YES"""
conn2.Open connstr
sqlstr = "select * from [Sheet1$] "
rs.Open sqlstr, conn2, 1, 1
Do While Not rs.EOF
a=a & rs(0)
rs.MoveNext
结果就是从第二行开始读的
据说第一行被当成列名了
而我想把第一行也当成纪录读 该怎么办呢？
Set conn2 = CreateObject("adodb.connection")
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Text1.Text & "\概况\企业名称表.xls" & ";" & _
"Extended Properties=""Excel 8.0;HDR=YES"""
conn2.Open connstr
sqlstr = "select * from [Sheet1$] "
rs.Open sqlstr, conn2, 1, 1
Do While Not rs.EOF
a=a & rs(0)
rs.MoveNext
结果就是从第二行开始读的
据说第一行被当成列名了
而我想把第一行也当成纪录读 该怎么办呢？
yangao 2005-02-21
- 打赏
- 举报
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source='" & sFile & "';Extended Properties=""Excel 8.0;"""
oRS.Open "Select * from [sheet1$]", oConn, adOpenStatic
就是从第一行开始读的数据啊
oRS.Open "Select * from [sheet1$]", oConn, adOpenStatic
就是从第一行开始读的数据啊
