PHP操作excel报错（见如下代码）?

图片说明
<?php
$conn=new com("adodb.connection");
$connstr="Driver={Microsoft Excel Driver (*.xls)};DBQ=".realpath("excel/book.xls");
$conn->open($connstr);
$sql="select * from [Sheet1$]";
$rs=$conn->execute($sql);
if($rs->eof || $rs->bof)
{
echo "

暂无图书信息!

";
}
else
{
while(!$rs->eof)
{
?>

    页面显示结果见上图
    提示这一句“ $conn->open($connstr);”报错。
    查看odbc，发现Microsoft Excel Driver有添加。请教怎么回事

你的excel是什么版本的，建议你用excel 2000或者2003看看。你看你这个网站，像是上个10年甚至20年前的产物呢。

1、R下载RODBC包，安装好。

install packages("RODBC"); #安装RODBC包

2、打开链接 http://dev.mysql.com/downloads/connector/odbc，下载mySQL ODBC，安装好：

3、控制面板--->管理工具--->数据源（ODBC）（根据电脑选择32位、64位）--->点击添加--->选中mysql ODBC driver选项（Unicode和ANSI任意选择一个）。

data source name（DSN数据源名称）填入你想要使用的名字，例如：mysql_data;

description 可以随意填写，例如mydata

TCP/IP Server 本机服务器IP，一般为：127.0.0.1或者localhost

user 你的mysql用户名

password 你的mysql密码

然后数据库里会出现你的mysql里的所有数据库，选择一个数据库。

4、打开R的界面调用数据库：（本人使用的是RStudio）
（1）library(RODBC);

（2）channel <- odbcConnect("mysql_data", uid="root", pwd="123456");

（3）sqlTables(channel); #查看数据库中的表

（4）data<-sqlFetch(channel,"titanicdata"); # 将表titanicdata的内容，存到数据框data里

5、至此，R已经成功与mysql数据库连接，并且获取了mysql库中niesheng数据库里titanicdata表中的数据。

6、既然能够连接上数据库，那么在R中同样可以使用SQL语句进行数据处理和数据提取。

例1：将年龄不为空的数据存入data1数据集中。

data1 <- sqlQuery(channel, "selectsurvived, age, class, sex from titanicdata where age<> 'null';

例2：将是否幸存survived、阶级class、性别sex 都转换为1、0这样的数值，便于后面进行分析。

Titanic <- sqlQuery(channel, "select (CASE WHEN t.survived='yes' THEN 1 ELSE 0 END) survived, age,(case when t.class='1st' then 1 when t.class='2st' then 2 else 3 end) class,

(case when t.sex='male' then 1 else 0 end) sex

from titanicdata t where age<> 'null' ORDER BY survived,age;");

7、R不仅可以连接mysql，还能连接其他数据源，包括Access、Excel、SQLServer数据库等。具体可以参考R中的odbcConnect的具体用法。

二、安装RODBC库
1、进入R语言的GUI界面（RGUI.EXE)，在菜单栏选择“程序包/安装程序包”
2、在弹出的窗口里往下拉，选择RODBC如图，点击确定
3、在ODBC数据源管理器里将需要的数据库添加进去，这里笔者使用的是SQL Server2008，驱动程序选择Native Client10.0

4、在R语言窗口输入连接语句

library(RODBC)

**这里是载入RODBC库

channel<-odbcConnect("MyTest",uid="ripley",case="tolower")

**连接刚才添加进数据源的“MyTest”数据库

ch <- odbcConnect("some dsn ", uid = "user ", pwd = "** ")

表示用户名为user，密码是**，如果没有设置，可以直接忽略

data(USArrests)

**将“USArrests”表写进数据库里（这个表是R自带的）

sqlSave(channel,USArrests,rownames = "state",addPK = TRUE)

**将数据流保存，这时候打开SQL Server就可以看到新建的USArrests表了

rm(USArrests)

sqlTables(channel)

**给出数据库中的表

sqlFetch(channel,"USArrests",rownames = "state")

**输出USArrests表中的内容

sqlQuery(channel,"select * from USArrests")

**调用SELECT查询语句并返回结果（如图）

sqlDrop(channel,"USArrests")

**删除表

odbcClose(channel)

**最后要记得关闭连接

当然，通过这个办法也可以读取Excel、Access表中的内容，具体方法类似，这里不再重复