使用Perl连接Access数据库详解
前题是必须安装好activeperl （505以上），以及MS Access 97
一.
安装Win32-ODBC模块
步骤1：
从TOOLS栏目中下载Win32-ODBC.zip,下载完后用winzip解开到一个temp目录,共有三个文件：
Readme
Win32-ODBC.ppd
Win32-ODBC.tar.gz
步骤2：
在DOS窗口下，temp目录中运行下面的DOS命令：
ppm
install Win32-ODBC.ppd
二. 准备测试用数据库
（ACCESS）
步骤1：
启动MS
ACCESS,建立一个新空数据库，命名为odbctest.mdb,保存在某一目录中（记住路径）。
步骤2：
然后新建一个表，建立三个字段：
字段名称
数据类型
Name 字符，长度50
Email 字符，长度50
Age
数字，长整型
将这个表保存为address（注意这个例子中，没有用自动增加的ID）.输入若干记录：
Nighthawk nighthawk@163.net
20 1234567
John jt@163.net
24 0284393293
kit kit@21cn.com
18
3948932
保存后，关闭数据库文件。
步骤3：
打开控制面板中的
ODBC数据源（32位），在用户DSN栏中，找到用户数据源列表,选中名称为“MS Access 97
Database”的一行，然后按“配置”键。
在Database框中按"Select.."，选择步骤1.2中建立的数据库文件odbctest.mdb,按OK即可。ODBC设置中的其它项目全部采用缺省设置，然后就是OK,确定，关闭对话窗口。
三.
这时候，数据库已经可以用了，我们来测试一下：
#!/usr/bin/perl
use
Win32::ODBC;
$DSN = "MS Access 97 Database";
$DBase =
"access.mdb";
#连接数据库
if (!($db = new
Win32::ODBC($DSN))){
print
"连接数据库失败.\n";
exit();
}
else{
print "连接数据库成功 (连接号：",
$db->Connection(), ")\n\n";
}
#数据库中的表
print
"数据库中的表：";
@tables = $db->TableList;
print @tables;
print
"\n";
#选择数据表
if (! $db->Sql("SELECT * from [address] WHERE
age>=20") ){
@FieldNames = $db->FieldNames();
$Cols
= $#Field
相关文档：
一、创建一张空表：
Sql="Create TABLE [表名]"
二、创建一张有字段的表：
Sql="Create TABLE [表名]([字段名1] MEMO NOT NULL, [字段名2] MEMO, [字段名3] COUNTER NOT NULL, [字段名4] DATETIME, [字段名5] TEXT(200), [字段名6] TEXT(200))
字段类型：
2 : "SmallInt", // 整型
3 : "Int", ......
最近系统运行中发现Access 2003 版本中对待 Null 和 ‘’ （空字符）奇怪问题，重现步骤：
1、创建表tabTest ；
2、使用设计视图添加两个字段 ID ，col1
名称
类型
长度
说明
ID
Number
主键，自增
Col1
char
1
无
3、使用sql 添加如下数据
-- col1 字段设置为 null
INS ......
<?php
$connstr="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" . realpath("data.mdb");
$connid=odbc_connect($connstr,"","",SQL_CUR_USE_ODBC);
$issuetime=date("Y-m-d H:i:s");
$sql="insert into test values("","",...)";
$result=odbc_exec($connid,$sql);
if($result) echo "successful";
else ec ......
asp 中文乱码,asp access 乱码,asp 刷新后乱码,asp utf 8乱码,ajax 乱码 asp,asp 汉字乱码,asp乱码怎么办
用utf-8编码用在新的网站上，不想问题还真多，所以找了些文章，帖子，看了看，等下有用的就贴下面了。
今天，我开始把 CODEPAGE="936" 改成 CODEPAGE="65001"
把charset=gb2312改成 charset=utf-8
可是还是乱码 ......
1:在StaAfx.h 中添加如下代码 #import "C:\\Program Files\\Common Files \\System\\ado\\msado15.dll" no_namespace rename("EOF","adoEOF")rename("BOF","adoBOF")
2:在BOOL CXXXApp::InitInstance()中初始化COM环境
::CoInitialize(NULL);
释放COM环境
::CoUninitialize();
......
