perl新手....win32::ODBC问题

std_ream 2000-03-29 04:41:00
我在调试perl win32::ODBC程序时发现下面的问题:

我的程序通过CGI程序和数据库通信。

当我在命令行下执行程序时程序能和数据库连接,但因为没有输入程序出错,这是正常的。
当我用Web页触发CGI程序时,程序竟然.....连接不上数据源.....。
什么原因,请指教

...全文
168 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
zealy 2000-09-14
  • 打赏
  • 举报
回复
我用的ADO,精简如下:

use Win32::ODBC;
use Win32::OLE;
use Win32::OLE::Const 'Microsoft ActiveX Data Objects';

...

my $Conn = Win32::OLE->new('ADODB.Connection'); # creates a connection object

$Conn->Open("DSN=CA_mdb;UID=;PWD=;DBNAME=beca.mdb"); # opens the database connection

if ($updateflag == 0){
$cmd = "INSERT INTO user_data (email,key,csr) VALUES ('$user','$key','$csr');";
}
else{
$cmd = "UPDATE user_data SET key='$key',csr='$csr' WHERE (email = '$user');";
}

......

my $rc = $Conn->Execute("$cmd");
if (Win32::OLE->LastError()){
}
else{
print $user,"success!",br,br;
}


$Conn->Close;


wsh218 2000-05-21
  • 打赏
  • 举报
回复
我正用 perl win32::odbc 对数据库进行操作。但我只会
对数据库进行查询,不知能否提供对表格的插入操作的cgi
程序段,

2,204

社区成员

发帖
与我相关
我的任务
社区描述
Web 开发 CGI
社区管理员
  • CGI社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧