标签归档:access

PHP连接Access的方法

最近准备放弃使用许久的vbscript作为处理工作方面问题,而转向PHP。
应该是ASP转向PHP把,怎么是vbscript转向php?这个我要说一下,处理工作方面问题,比如通过API导个数据…用ASP,PHP在IIS中执行肯定不行,写个VBScript脚本,cscript 脚本名 让他执行吧,别的不用关了。所以用脚本处理些数据转换、导入导出还是不错的选择。
VBScript的致命的缺点是不支持引用文件,对HTTP请求方便不是很强,正则、XML处理起来不方面,JSON作为数据载体时就等着傻眼把。这是后用php作为脚本也是一个不错的选择。扯得有点远了,换成了php,数据库还是Access怎么办?这个简单,直接用com创建adodb实例即可。
现在已经创建好了数据库,只填写了部分域名,要通过php到域名查询接口返回whois信息,并存到Access数据库中,Access字段名已对应返回数组中的索引相同。

<?php
	set_time_limit(0);

	#因为要链接web,使用我前几天写的myhttp类。
	include('myhttp.clsss.php');
	#API操作,这里直接忽略,里边有个get_domain_info来获取API返回的数据,并处理成数组。
	include('api.function.php');
	
	$conn = new COM("Adodb.Connection");
	$conn -> open("provider=microsoft.jet.oledb.4.0;data source=D:\myweb\miaoqiyuan.cn\test\php-linkdb\domain.mdb");
	
	$dlist = new COM("ADODB.Recordset");
	$rs = new COM("ADODB.Recordset");
	
	$dlist -> open("select [domain],[did] from [domain] where isupdate=0",$conn,1,1);
	while(!$dlist -> eof()){
		echo "下载域名数据[".$dlist['domain']."].\n";
		$d=get_domain_info($dlist['domain']);
		$rs -> open("select * from [domain] where  did=".$dlist['did'],$conn,3,2);
		foreach($rs -> fields as $k => $v){
			if($k >= 6){
				$myvalue = $d[$rs[$k] -> name];
				if(isset($myvalue) && !is_array($myvalue)){
					$rs[$k] -> value = mb_convert_encoding($myvalue,"GB2312","UTF-8");
				}
			}
		}
		$rs['isupdate'] -> value = 2;
		$rs -> update();
		$rs -> close();
		$dlist -> movenext();
	}
?>

Access随机读取几条记录的方法

在程序设计时,可能经常用到随机读取几条记录的功能,MSSQL有order by NewID()的方法,Access怎么办呢?
经过一翻百度搜索,还真找到了一些解决方案:

网上还有一种说法,有人采用一条SQL语句解决Access随机读取几条记录的问题:select top 50 * from table order by int(rnd()*50),不过这种方法我不敢苟同,也许是我的只是不够渊博,我竟然不能理解。如果int(rnd()*50)应该是一个数了吧,int(rnd()*50),不初始化种子,所以每次返回结果都是一样的,所以相当于没有排序。

还有一种方法,就是先获取总记录数,然后取1~总数之间的随机数,rs.move,不过这种方法有点罗嗦,在此不推荐。

再反回来看第一种方法,如果稍微修改一下,给rnd添加一个种子呢,比如第一条记录rnd(1),第二条记录rnd(2)….。有了,数据库中的id字段(自动编号主键)不正是现成的吗?select top 10 * from news order by rnd(id)。对就是这样简单。

在测试的时候还发现了另一个有趣的事情,如果order by 常量数字,比如select top 10 * from news order by 1 desc则是按第一列结果倒序来排序。

set rs=conn.execute,set rs=server.createobject(“ADODB.recordset”)的若干谎言

经常用asp的同行,可能会建议用set rs=conn.execute(sql)来代替set rs=server.createobject(“ADODB.recordset”):rs.open conn,sql,1,1。还有一些同行更提出了用set rs=conn.execute(sql):res=rs.getRows(100)来优化ASP程序。其实在没有做此实验前,我也是很相信这种方法的。实际效果果真如此吗?经过一番测试,我发现结果远非如此,set rs=server.createobject(“ADODB.recordset”)的方法比set rs=conn.execute的方法快4~5倍。这个结果您信吗?不信,更我来一起做这个测试。猫七(苗启源)博客首发,转载请注明出处,原文地址: (http://www.miaoqiyuan.cn/p/conn-execute_rs-getrows)。

数据说明真相。首先创建一个多记录的数据库。

set conn=createobject("adodb.connection")
conn.open "provider=microsoft.jet.oledb.4.0;data source=E:\labs\miaoqiyuan.cn\g.mdb"
do while conn.execute("select count(id) from site")(0)<1000000
	conn.execute("insert into site(sitename,siteadmin,siteurl,sitekey) values('苗启源','http://localhost/app_login/','http://www.miaoqiyuan.cn','e10adc3949ba59abbe56e057f20f883e')")
loop

经过几个小时的运行,我得到了一个有63万多条记录的数据库。数据库大小为99.7MB(测试数据库下载地址http://www.miaoqiyuan.cn/products/rs-execute-test.rar)。

为了保证数据的真实性,我们用公共的头部header.asp来保存数据库连接字符串。footer.asp来保存运行时间。

运行环境,Windows 2003 Server SP2。IIS6.0,CPU E2200 2.2GHz,内存2Gx2。硬盘300G SATA+80G ATA。

公共头部:header.asp

< %
startTme=timer()
set conn=server.createobject("ADODB.connection")
conn.open "provider=microsoft.jet.oledb.4.0;data source="&server.mappath("g.mdb")
%>

公共底部:footer.asp

<hr />总共用时:< %=(timer()-startTme)*1000%>毫秒

测试方法:以三种方式,每页100条记录。同时读取第6000页到6099页的记录共一万条,并测出运行时间。

test1.asp,采用set rs=server.createobject(“ADODB.recordset”)的方法。


< %
for k=0 to 100
	response.write "<br /><br />第"&(6000+k)&"页<hr />"

	set rs=server.createobject("adodb.recordset")
	rs.open "select * from site",conn,1,1
	rs.pagesize=100
	rs.absolutepage=6000+k
	i=0
	do while not rs.eof and i<100
		i=i+1
		response.write rs("id")&":"&rs("sitename")&"<br />"&vbCrlf
		rs.movenext
	loop
	rs.close
	set rs=nothing

next
%>

test2.asp 采用set rs=conn.execute()的方法


< %
for k=0 to 100
	response.write "<br /><br />第"&(6000+k)&"页<hr />"

	set rs=conn.execute("select * from site")
	rs.movefirst
	rs.move (6000+k)*100
	i=0
	do while not rs.eof and i<100
		i=i+1
		response.write rs("id")&":"&rs("sitename")&"<br />"&vbCrlf
		rs.movenext
	loop
	rs.close
	set rs=nothing

next
%>

至于getRows,这种方法只能算是返回结果的优化,并不能算是一种方法。我们采用两种返回结果的方式测试。test3.asp采用set rs=server.createobject(“ADODB.recordset”)的方法,test4.asp采用set rs=conn.execute(sql)的方法


< %
for k=0 to 100
	response.write "<br /><br />第"&(6000+k)&"页<hr />"

	set rs=server.createobject("adodb.recordset")
	rs.open "select * from site",conn,1,1
	rs.pagesize=100
	rs.absolutepage=6000+k
	res=rs.getRows(100)
	rs.close
	set rs=nothing
	for i=0 to 99
		response.write res(0,i)&":"&res(1,i)&"<br />"&vbCrlf
	next

next
%>


< %
for k=0 to 100
	response.write "<br /><br />第"&(6000+k)&"页<hr />"

	set rs=conn.execute("select * from site")
	rs.movefirst
	rs.move (6000+k)*100
	res=rs.getRows(100)
	rs.close
	set rs=nothing
	for i=0 to 99
		response.write res(0,i)&":"&res(1,i)&"<br />"&vbCrlf
	next

next
%>

下面是我的测试结果:

test1.asp test2.asp test3.asp test4.asp
第一次测试 4281.25毫秒 20656.25毫秒 4281.25毫秒 18671.88毫秒
第二次测试 4234.375毫秒 25171.88毫秒 4312.5毫秒 13781.25毫秒
第三次测试 4328.125毫秒 20031.25毫秒 4234.375毫秒 19093.75毫秒

为什么会出现这种结果呢?set rs=conn.execute(sql),set rs=server.createobject(“ADODB.recordset”)为什么为相差这么多?对比一下test1.asp、test3.asp与test2.asp、test4.asp,除了返回结果的方式不同,还有一处就是rs.move。难道是这个原因?把test3.asp的代码稍微修改一下。存为test5.asp。


< %
for k=0 to 100
	response.write "<br /><br />第"&(6000+k)&"页<hr />"

	set rs=server.createobject("adodb.recordset")
	rs.open "select * from site",conn,1,1
	rs.movefirst
	rs.move (6000+k)*100
	res=rs.getRows(100)
	rs.close
	set rs=nothing
	for i=0 to 99
		response.write res(0,i)&":"&res(1,i)&"<br />"&vbCrlf
	next

next
%>

经过测试,test5.asp能比test3.asp快0.1~0.2秒,如果读取100条数据,这点差距可以忽略不计。

由此可见:set rs=conn.execute的方式确实比set rs=server.createobject(“ADODB.recordset”)方式慢,在学校的时候,老师教的一般都是set rs=server.createobject(“ADODB.recordset”)的方法,真正工作室,学习所谓的高手set rs=conn.execute优化的方法,结果最终发现,而鄙视用老师教的方法写程序的同行,最终发现还是老师教的速度快,而且set rs=server.createobject(“ADODB.recordset”)的方法比set rs=conn.execute的方法快4~5倍。囧。。。。猫七(苗启源)博客首发,转载请注明出处,原文地址: (http://www.miaoqiyuan.cn/p/conn-execute_rs-getrows)。

难道set rs=conn.execute就一无是处了吗?在数据插入方面,两者的差别有多大呢?详情请关注我的博客(http://www.miaoqiyuan.cn)今天太累了,就写这些吧~