请问如何用数据库技术DAO、ADO直接打开Excel.xls文件?急!
不用ODBC方法,而是直接打开文件!
不用ODBC方法,而是直接打开文件!
解决方案 »
- VB执行EXECUTE的SQL语句问题???
- 请教各位前辈们:关于数据处理的问题
- 在VB6中用ADO编程,如何更新第5个记录的第3个属性renID的值
- 一张小图片按照大图片画出的路径移动
- 文件复制出现的问题,散分!
- 关于水晶报表4.6的数据库连接
- COM组件和对象链接嵌入的问题
- 我想知道VB与UBS接口怎样通迅,接口软件怎样编写?
- Help me ~~~~~~~~~~
- 怎么样知道在系统里有没有运行某个软件??实现未运行就运行,如果已运行就不再运行的功能。
- 求:把ACCESS VBA程序移植到VB6下的注意事项
- 点击“开始”按钮,启动timer控件,文本框随机产生一个名字,点击“停止”按钮后停止timer控件。当再点击“开始”按钮,text显示的名字中排除刚才显示的那个,应该怎样实现?
System.Data.OleDb.OleDbConnection OleExcel = new System.Data.OleDb.OleDbConnection("provider=Microsoft.Jet.OLEDB.4.0; data source=" + openFileDialog1.FileName + ";Extended Properties=Excel 8.0;");
System.Data.OleDb.OleDbDataAdapter OleCommand = new System.Data.OleDb.OleDbDataAdapter("select * from [Ôôé$]", OleExcel);
DataTable[] dtRead = new DataTable[4];
dtRead[0] = new DataTable();
OleCommand.Fill(dtRead[0]);
dim rs as new adodb.recordset
dim strsql as string'建立与EXCEL文件的连接
With ac_Excel
.CursorLocation = adUseClient
If .State = adStateOpen Then .Close
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\aa.xls;Extended Properties=Excel 8.0;HDR=Yes;IMEX=1"
.Open
.CommandTimeout = 0
End Withstrsql=" select * from sheet1$ "
if rs.state<>adstateclosed then rs.close
rs.open strsql,ac_excel,adopenkeyset,adlockreadonly