access 数据库问题，大家帮帮忙

[dfboyxing]

我做了个测试有两个页面一个 1.asp,2.asp
1.asp 内容是简单的数据库数据查询，平常访问时很快。
2.asp 如下内容

<%
	for i=1 to 10000
	'取得商务一部的当月目标
  	set rsO1=server.CreateObject("adodb.recordset")
	sqlO1="select * from Operation where UserId=1000 and OperationDate=#"&cdate(year(date())&"-"&month(date()))&"#"
	rsO1.open sqlO1,conn,1,1
	if not rsO1.eof then
		target1=rsO1("target")
	end if
	rsO1.close():set rsO1=nothing
	next
	conn.close():set conn=nothing
	%>

问题：当我访问2.asp的时候须要30秒，就在访问2.asp的同时另开一页访问1.asp，这时1.asp也变的很慢须要等2.asp运行结束后才开始运行1.asp。而且数据库会生成一个 .ldb 的日志文件。

这个问题该如何解决，2.asp 慢点没关系（关键是他会影响其它页面的访问，怎么才能让 他不影响 1.asp 的迅速）

[RandyTech]

set rsO1=server.CreateObject("adodb.recordset") 
for i=1 to 10000  '取得商务一部的当月目标  
sqlO1="select * from Operation where UserId=1000 and OperationDate=#"&cdate(year(date())&"-"&month(date()))&"#" 
 rsO1.open sqlO1,conn,1,1  
if not rsO1.eof then  
target1=rsO1("target") 
end if  
rsO1.close
next 
set rsO1=nothing
conn.close():set conn=nothing

试试这个

[toury]

只要你连库（ACCESS）了，那个.ldb文件就会出现，你的猜测是错的

[toury]

  set rsO1=server.CreateObject("adodb.recordset") 
  for i=1 to 10000  '取得商务一部的当月目标  
    sqlO1="select * from Operation where UserId=1000 and OperationDate LIKE '%"&cdate(year(date())&"-"&month(date()))&"%'" 
  rsO1.open sqlO1,conn,1,1  
  if not rsO1.eof then  
    target1=rsO1("target") 
  end if  
  rsO1.close
  next 
  set rsO1=nothing
  conn.close():set conn=nothing

[dfboyxing]

[Quote=引用 10 楼 toury 的回复:]
只要你连库（ACCESS）了，那个.ldb文件就会出现，你的猜测是错的
[/Quote]
我的意思是
当access 打开conn的时候 都会产生.ldb 文件 这个是没错的。
但是我不明白当 2.asp 只是读数据的时候。1.asp会等待 2.asp读数据完后再运行呢。同样是读数据又没写操作为什么不能同时进行（有什么办法让他们同时进行） 不知道我表达是否有误。

[toury]

2.asp的sql语句出错时才会出现你说的等待。检查代码逻辑先
OperationDate LIKE 一下看看，别用OperationDate=

[dfboyxing]

[Quote=引用 13 楼 toury 的回复:]
2.asp的sql语句出错时才会出现你说的等待。检查代码逻辑先
OperationDate LIKE 一下看看，别用OperationDate=
[/Quote]
用like 还是同样的问题，两个页面还是同时执行完。

[dfboyxing]

1.asp

<%
	Response.Write(now())
	set rsO1=server.CreateObject("adodb.recordset") 
    sqlO1="SELECT * FROM [user]" 
  rsO1.open sqlO1,conn,1,1  
  if not rsO1.eof then  
    Response.Write("  ")
  end if  
  rsO1.close
  set rsO1=nothing
  conn.close():set conn=nothing

	Response.Write("<br>")
	Response.Write(now())
	%>

2.asp

<%
	Response.Write(now())
	  set rsO1=server.CreateObject("adodb.recordset") 
  for i=1 to 10000  '取得商务一部的当月目标  
    sqlO1="select * from Operation where UserId=1000 and OperationDate LIKE '%"&cdate(year(date())&"-"&month(date()))&"%'" 
  rsO1.open sqlO1,conn,1,1  
  if not rsO1.eof then  
    target1=rsO1("target") 
  end if  
  rsO1.close
  next 
  set rsO1=nothing
  conn.close():set conn=nothing

	Response.Write("<br>")
	Response.Write(now())
	%>

先运行2.asp 1移后刷新 1.asp
结果：2.asp 显示
2009-7-23 16:28:39
2009-7-23 16:29:07
1.asp 显示
2009-7-23 16:29:07
2009-7-23 16:29:07

[dfboyxing]

我错了，

[月光下的土豆]

set rsO1=server.CreateObject("adodb.recordset") 
for i=1 to 10000  '取得商务一部的当月目标  
sqlO1="select * from Operation where UserId=1000 and OperationDate=#"&cdate(year(date())&"-"&month(date()))&"#" 
 rsO1.open sqlO1,conn,1,1  
if not rsO1.eof then  
target1=rsO1("target") 
end if  
next 
rsO1.close():set rsO1=nothing
conn.close():set conn=nothing

验证一下吧。一定比你的省时

[dfboyxing]

回复1楼的，
运行错误，再说这也不我想要解快的问题，2.asp 的速度优化，先不管。怎么才能解决我说的 2.asp 慢点没关系（关键是他会影响其它页面的访问，怎么才能让 他不影响 1.asp 的迅速）

[月光下的土豆]

set rsO1=server.CreateObject("adodb.recordset")
sqlO1="select * from Operation where UserId=1000 and OperationDate=#"&cdate(year(date())&"-"&month(date()))&"#"
rsO1.open sqlO1,conn,1,1

你这个执行10000次，而且是每执行一资都要创建一次rsO1
这样这个就会占用大量的资源，当然会影响1.asp的速度了


上面报什么错

[dfboyxing]

可能我用2.asp 影响 1.asp 的迅速（这个有点不恰当）。准确的来说是 1.asp 要等 2.asp 执行完了再运行。（这个问题应该是出现在数据的 .ldb 文件锁 我猜的 但是不知道怎么解决）

回复楼上 上面报什么错 （记集在打开的时候，不能在打开了。）

[gxq323]

循环10000次没意义,最后取得的值还不就是target1吗？你万一最后一条记录rsO1("target")=“”呢？

[dfboyxing]

我这只是打个比方测试有啊，实际运用（是取所有商务部当月的目标，公司有多少业务员就执几次）

[dfboyxing]

有没有人，帮忙解决一下，在线关注。

[月光下的土豆]

你现在须要解决的是时效与业务的问题