小宇飞刀的BLOG

Visual Studio 2008 简体中文正式版下载及序列号(无使用期限限制,正式版)

Sat, 02 Jan 2010 08:57:15 +0000

Visual Studio 2008 简体中文正式版下载及序列号(无使用期限限制,正式版)

1.让试用版变成正式版
    从Microsoft那下了7个压缩文件分包后，解压后是一个ISO文件。
  我用UltraISO编辑了下ISO文件：Setup-->setup.sdb文件提取出来编辑，将
    [Product Key]
    T2CRQGDKBVW7KJR8C6CKXMW3D
改成
    [Product Key]
    PYHYPWXB3BB2CCMV9DX9VDY8T
这样，安装的时候就默认是这个正版的序列号了。
还有一种方法就是，不改这个文件，安装后，再添加删除程序的时候可以输入序列号：
    PYHYP－WXB3B－B2CCM－V9DX9－VDY8T
也可以变成正版。
好了，可以安装了^_^
顺便把下载连接贴出来：
官方下载地址：

http://www.microsoft.com/downloads/details.aspx?familyid=D95598D7-AA6E-4F24-82E3-81570C5384CB&displaylang=zh-cn

或直接下载压缩：
http://download.microsoft.com/download/0/8/3/0839ce16-0523-4407-9432-01958ee61aff/VS2008TeamSuite90DayTrialCHSX1429243.part1.exe
http://download.microsoft.com/download/0/8/3/0839ce16-0523-4407-9432-01958ee61aff/VS2008TeamSuite90DayTrialCHSX1429243.part2.rar
http://download.microsoft.com/download/0/8/3/0839ce16-0523-4407-9432-01958ee61aff/VS2008TeamSuite90DayTrialCHSX1429243.part3.rar
http://download.microsoft.com/download/0/8/3/0839ce16-0523-4407-9432-01958ee61aff/VS2008TeamSuite90DayTrialCHSX1429243.part4.rar
http://download.microsoft.com/download/0/8/3/0839ce16-0523-4407-9432-01958ee61aff/VS2008TeamSuite90DayTrialCHSX1429243.part5.rar
http://download.microsoft.com/download/0/8/3/0839ce16-0523-4407-9432-01958ee61aff/VS2008TeamSuite90DayTrialCHSX1429243.part6.rar
http://download.microsoft.com/download/0/8/3/0839ce16-0523-4407-9432-01958ee61aff/VS2008TeamSuite90DayTrialCHSX1429243.part7.rar
团队资源管理器：
http://download.microsoft.com/download/d/7/2/d72f8415-7b4b-4168-ba3b-65c3ca4c1f81/VS2008TeamExplorerCHS.iso

一些VS2008介绍及学习资料:
Visual Studio 2008的性能改进以及十大新功能:
http://news.csdn.net/n/20080125/113132.html

CSDN--Visual Studio 2008专题
http://subject.csdn.net/vs2008/

对XML文档操作的ASP实现（指定节点文本的增加、删除、修改、查看）

Tue, 15 Sep 2009 02:19:05 +0000

对XML文档操作的ASP实现（指定节点文本的增加、删除、修改、查看）

<%
'----------------------------------------------------------------
'功能简介: asp对XML文档中指定节点文本的增加、删除、修改、查看
'入口参数: 无
'出口参数: 无
'------------------------------------------------
'函数名字：ConnectXml()
'入口参数: filename 需要连接或打开的xml文件名
'出口参数: 无
'返回值 ：ConnectXml=0，XMLMorntekDocument就是一个成功装载XML文档的对象了。
'ConnectXml<>0,则打印错误信息strError
'------------------------------------------------
dim XMLMorntekDocument

function ConnectXml(filename)
  dim strSourceFile
  strSourceFile = Server.MapPath(filename)
  Set XMLMorntekDocument = Server.CreateObject("Microsoft.XMLDOM") 
  XMLMorntekDocument.async = false 
  XMLMorntekDocument.load(strSourceFile)
  ConnectXml=XMLMorntekDocument.parseerror.errorcode
  if XMLMorntekDocument.parseerror.errorcode<>0 then
    strError="<h2>error"&XMLMorntekDocument.parseerror.errorcode&"</h2>"
    strError=strError&XMLMorntekDocument.parseerror.reason&"<br/>"
    strError=strError&XMLMorntekDocument.parseerror.url&"<br/>"
    strError=strError&XMLMorntekDocument.parseerror.line&"<br/>"
    strError=strError&XMLMorntekDocument.parseerror.filepos&"<br/>"
    strError=strError&XMLMorntekDocument.parseerror.srcText&"<br/>"
    response.write strError
  end if
end function

'------------------------------------------------
'函数名字：CloseXml()
'入口参数: 无
'出口参数: 无
'------------------------------------------------
function CloseXml(XMLMorntekDocument)
  if IsObject(XMLMorntekDocument) then
    set XMLMorntekDocument=nothing
  end if
end function

'------------------------------------------------
'函数名字：SelectXmlNodeText(elementname)
'入口参数: elementname 元素的名字
'出口参数: 无
'------------------------------------------------
function SelectXmlNodeText(elementname) 
  elementname="//"&elementname
  temp=XMLMorntekDocument.selectSingleNode(elementname).text
  selectXmlNodeText= server.htmlencode(temp) 
end function

'------------------------------------------------
'函数名字：InsertXmlNodeText(befelementname,elementname,elementtext)
'入口参数: elementname 插入的元素的名字
'          befelementname在此元素的名字前面插入元素
'          elementtext 插入的元素的文本
'出口参数: 无
'------------------------------------------------
function InsertXmlNodeText(befelementname,elementname,elementtext) 
  dim befelement,element
  set befelement=XMLMorntekDocument.selectSingleNode("//"&befelementname)
  set element= XMLMorntekDocument.createelement(elementname)
  befelement.insertBefore element,befelement.firstchild
  element.text=elementtext
end function

'------------------------------------------------
'函数名字：UpdateXmlNodeText(elementname,newelementtext)
'入口参数: elementname 元素的名字
'          newelementtext元素的新文本
'出口参数: 无
'------------------------------------------------
function UpdateXmlNodeText(elementname,newelementtext) 
  dim element
  set element=XMLMorntekDocument.selectSingleNode("//"&elementname)
  element.text=newelementtext
end function

'------------------------------------------------
'函数名字：DeleteXmlNodeText(elementname)
'入口参数: elementname 元素的名字
'出口参数: 无
'------------------------------------------------
function DeleteXmlNodeText(elementname) 
  XMLMorntekDocument.selectSingleNode("//"&elementname).text =""
end function 
%>

点击这里下载文件

工行网上支付例子分析

Mon, 14 Sep 2009 16:00:11 +0000

网上有位网友问：
请哪位大哥帮我解决一下问题，我在做一个商城的工行网上支付的功能，但是每次工行的系统都提示错误，（错误信息代码：32158），但是我就是找不到错在什么地方，请大家帮我找找错在什么地方，谢谢诶
原问题在这里：http://topic.csdn.net/u/20081030/19/30732157-ea32-409f-b8d5-d9022df6992d.html
这是网友提交出错的代码：

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>
<head>  <%=show_keywords("../")%> <%menu=2%>
</head>
<body          leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">



<table width="960" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td valign="top" width="255" style="background:url(images/line_h.gif) right repeat-y;">  </td>
    <td width="705" valign="top"> <table width="705" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td width="207">  </td>
        <td width="498" align="right" background="../images/dh_bg.gif" style="padding-right:15px; color:#4D7002;">当前位置：天方茶业 -> 确认订单 </td>
      </tr>
    </table>
<%
id=request("no_num1")
if isnumeric(id) = false then
  response.Write " <script>alert('非法定单编号！');history.go(-1) </script>"
  response.End()
end if
' **************************************************************************************
curYear = Year(now)
curMonth = Month(now)
If curMonth < 10 Then
  curMonth= "0" & curMonth
End If
curDay = Day(now)
If curDay < 10 Then
  curDay = "0" & curDay
End If
curHour = Hour(now)
If curHour < 10 Then
  curHour = "0" & curHour
End If
curMinute = Minute(now)
If curMinute < 10 Then
  curMinute = "0" & curMinute
End If
curSecond = Second(now)
If curSecond < 10 Then
  curSecond = "0" & curSecond
End If
orderDate = curYear & curMoth & curDay & curHour & curMinute & curSecond
'orderDate="20081030131010"
If Len(orderDate) <> 14 Then
  response.write orderDate
  response.write "时间格式错误！"
  response.end
End if'时间
amount = 5*100'订单金额
MerID = "1316EC10000247"'商户代码
merAcct = "1316099019200005175"'商户账号
goodsID = ID'商品编号
goodsName = "red_tea"'"红茶"'商品名称
goodsNum = "10"'商品数量
carriageAmt = "20"'已含运费金额
merHint = "info"'"商城提示"'商城提示(选输)
remark1 = "remark1"'"备注1"'备注字段1(选输)
remark2 = "remark2"'"备注2"'备注字段2(选输)
'merURL = "http://192.168.1.2:812/Product/recieve_online_order.asp"'返回时的路径  返回商户URL
merURL = "http://" & Request.ServerVariables("REMOTE_ADDR") & "/Product/recieve_online_order.asp"'返回时的路径  返回商户URL
merVAR = "test"'返回商户变量(选输)

Dim bb,rc
Set bb =CreateObject("ICBCEBANKUTIL.B2CUtil")
rc=bb.init (Server.Mappath("../user.crt"),Server.Mappath("../user.crt"),Server.Mappath("../user.key"),"12345678")
if rc <> 0 then
response.write "初始化失败. <br/>"
end if

src="<?xml version="&Chr(34)&"1.0"&Chr(34)&" encoding="&Chr(34)&"GBK"&Chr(34)&" standalone="&Chr(34)&"no"&Chr(34)&" ?><B2CReq><interfaceName>ICBC_PERBANK_B2C</interfaceName><interfaceVersion>1.0.0.3</interfaceVersion><orderInfo><orderDate>"&orderDate&"</orderDate><orderid>"&id&"</orderid><amount>"&amount&"</amount><curType>001</curType><merID>"&MerID&"</merID><merAcct>"&merAcct&"</merAcct></orderInfo><custom><verifyJoinFlag>0</verifyJoinFlag><Language>ZH_CN</Language></custom><message><goodsID>"&goodsID&"</goodsID><goodsName>"&goodsName&"</goodsName><goodsNum>"&goodsNum&"</goodsNum><carriageAmt>"&carriageAmt&"</carriageAmt><merHint>"&merHint&"</merHint><remark1>"&remark1&"</remark1><remark2>"&remark2&"</remark2><merURL>"&merURL&"</merURL><merVAR>"&merVAR&"</merVAR></message></B2CReq>"

'xml明文签名
ssrc = bb.signC(src, Len(src))
If ssrc = "" Then
  response.write "签名失败，错误原因:"
  response.write  bb.getRC
End If

'验证签名
rc=bb.verifySignC(src, Len(src), ssrc, Len(ssrc))
If rc <>0 Then
  response.write " <br/>验证签名失败，错误原因:"
  response.write  rc
End If

'获取商户证书
cert=bb.getCert(1)
If cert = "" Then
response.write " <br/>获取商户证书失败，错误原因:"
    response.write  bb.getRC
End If

tranData = ssrc
'再次签名
merSignMsg = bb.signC(ssrc, Len(ssrc))
merCert = cert
' **************************************************************************************
%>

博主解答：
错在：
1、rc=bb.init (Server.Mappath("../user.crt"),Server.Mappath("../user.crt"),Server.Mappath("../user.key"),"12345678") ，第一个参数应是银行证书文件，而不是商户证书文件。
2、tranData中应该存放xml明文的BASE64编码后的内容，例子中src变量内容即是xml明文，它是不需要签名的（也不能签名），而是要对它进行BASE64编码。BASE64编码、解码函数由开发者自已定义，银行API并未提供单独的BASE64编解码接口方法。
3、merSignMsg的内容才需要签名。
4、发给银行的数据是不需要验签的，只有银行返回的数据我们才需验签。验签成功说明数据无误，就可以对银行回传的数据进行BASE64解码，解码后的内容就是一个xml明文了，分析xml内容、判断交易结果等。

因此，在提交数据给银行的页面：
src=按接口规范构造的xml明文字符串
1、rc=bb.init (Server.Mappath("../银行证书文件.crt"),Server.Mappath("../user.crt"),Server.Mappath("../user.key"),"12345678")
2、tranData=base64Encode(src)  'src就是xml的明文内容
3、merSignMsg = bb.signC(src, Len(src))  '是对src即xml的明文内容签名，在签名过程中，signC已帮我们进行了base64编码
.....
在接收银行回传数据的页面：
merVAR = request("merVAR")   '商户在提交页面提交的内容，银行未作任何处理，原样返回。
notifyData = request("notifyData")  '这是银行回传的通知结果数据，是一个对XML明文文件，只不过对其进行了BASE64编码。
signMsg = request("signMsg")  '这是银行回传的银行对通知结果的签名数据，用于与notifyData数据进行验签核对之用，它其实是银行端对notifyData的内容先进行了一次签名，然后再对它进行了BASE64编码后的内容。
因此处理银行回传数据的过程如下：
1、对银行数据进行验签
rc=bb.verifySignC(notifyData,Len(notifyData),signMsg,Len(signMsg))
If rc <>0 Then
  response.write "
验证签名失败，错误原因:"
  response.write  rc
End If
2、验证成功后，对notifyData进行BASE64解码
xmlStr = base64Decode(notifyData)
3、分析此xmlStr，对交易结果进行处理

在脚本语言中调用WebService的方法

Sat, 10 May 2008 00:39:52 +0000

在脚本语言中调用WebService的方法：
1、如何在JavaScript中调用ＷebService
2、如何在ASP中调用ＷebService
3、如何在.Net中调用WebService
4、如何在ASP中调用由Delphi编写的WebService
............

Tags - 调用 , webservice , 脚本 , javascript , asp , .net

创建一个全功能的FLV播放

Sun, 06 Apr 2008 07:23:59 +0000

　　创建一个全功能的FLV播放器

　　我们将制作的这个FLV播放器由这样几部分组成：
　　一个用于显示视频图像的视频对象，
　　三个分别用于播放、暂停和停止视频的按钮，
　　连同一个用于显示缓冲区装载进度的动态文本。

　　1. 创建三个按钮元件，分别命名为“播放”、“暂停”、“停止”，将其各自一个实例拖放到场景舞台中。
　　2. 创建一个视频元件，将其一个实例拖放到场景舞台中，并赋予其实例名myVideo。
　　3. 在场景舞台中放置一个动态文本，赋予其实例名myText。
　　4. 在根时间线的第1帧中捆绑下面的脚本：

　　//创建一个NetConnection对象。
　　myFLVConnection=new NetConnection();

　　//创建一个流连接。
　　myFLVConnection.connect(null);

　　//创建一个NetStream对象。
　　//myFLVConnection被指定给该NetStream对象。
　　myFLVStream=new NetStream(myFLVConnection);

　　//myFLVStream被捆绑到Video对象myVideo：
　　myVideo.attachVideo(myFLVStream);

　　//配置缓冲时间。
　　myFLVStream.setBufferTime(10);

　　分析这段脚本，首先我创建了一个NetConnection对象myFLVConnection，然后我调用NetConnection对象的connect()方法打开了一个流连接，在调用connect()方法时您必须传递给他一个null值作为参数。
　　接下来，我利用myFLVStream=new NetStream(myFLVConnection);这行代码创建了一个NetStream对象myFLVStream，在创建时我就需要把为该“流”提供的“连接”告知他，即把myFLVConnection对象作为参数传递给NetStream类的构造函数。
　　之后，我把myFLVStream（“流”）捆绑到Video对象myVideo。然后，我还用NetStream类的setBufferTime()方法以秒为单位指定了一个缓冲时间，即要在缓冲区中装入可供播放多长时间的数据后才开始播放。

　　5. 在“播放”按钮实例上捆绑下面的脚本：

　　on(release){
　　 //装载并播放FLV文档。
　　 myFLVStream.play("myFLV.flv");
　　//定义bufferLoad函数以供setInterval函数调用来显示缓冲进度。
　　 function bufferLoad(){
　　 //在动态文本中显示缓冲区的装载进度。
　　 myText.text="缓冲区已装载"+int((myFLVStream.bytesLoaded/myFLVStream.bytesTotal)*100)+"%";
　　}

　　 //配置时间间隔。
　　 setInterval(bufferLoad,20);
　　}

　　这行代码―myFLVStream.play("myFLV.flv");用来装载和播放FLV文档。假如您的FLV文档位于某个HTTP地址或本地文档系统的某处，您能够使用http://或file://这样的格式作为路径的前缀来指定FLV文档的位置。
　　这个表达式―myFLVStream.bytesLoaded/myFLVStream.bytesTotal用来检查缓冲区已装载的字节占缓冲区要装载的总字节的比值。bytesLoaded和bytesTotal是NetStream类的两个属性。

　　6. 在“暂停”按钮实例上捆绑下面的脚本：

　　on(release){
　　 //暂停FLV文档。
　　 myFLVStream.pause();
　　}

　　7. 在“停止”按钮实例上捆绑下面的脚本：

　　on(release){
　　 //停止FLV文档并同时删除下载的FLV文档。
　　 myFLVStream.close();
　　}

　　8. 制作完成。您应该在您的网站中测试这个FLV播放器。

Win2003主机播放FLV视频的设置方法

Wed, 02 Apr 2008 07:43:54 +0000

Win2003主机下无法播放FLV视频的设置方法：
原因：
　　默认情况下，Win2003的主机.是没有指定输出FLV这种格式的。虽然FTP里面可以看见,但无法通过http访问,也就无法播放了。

三种解决办法:

一、找服务器管理员,添加FLV文件类型输出支持。
　　1. 在windows 2003 server 打开IIS管理器
　　2. 展开本地服务器
　　3. 右键点击本地服务器选择'属性'
　　4. 选择 'MIME Type'
　　5. 点击'New' 输入以下信息：
　　　* Associated Extension box: .FLV
　　　* MIME Type box: flv-application/octet-stream
　　6. 点击--'确定'
　　7. 重新启动 World Wide Web Publishing service（其实不必重启IIS的）

　　这是微软在MSDN中的英文原文：
　　Windows 2003 Server does not stream FLV videos
　　Please be aware that these steps do not resolve any issue with Macromedia Flash,but are a configuration step for Microsoft Windows 2003 and Microsoft IIS Server 6.0.
　　Any difficulties in executing those instructions or any errors that may arise from modifying your system settings should be addressed to Microsoft. For more details, please refer to your IIS documentation.On the Windows 2003 server, open the Internet Information Services Manager.Expand the Local Computer Server.Right-click the local computer server and select Properties.
　　Select the MIME Types tab.Click the New... button and enter the following information:Associated Extension box: .FLV
　　MIME Type box: flv-application/octet-stream
　　Click Ok.
　　Restart the World Wide Web Publishing service.

二、把扩展名flv改成swf来播放。

三、变通法（解决“虚拟主机都不支持Flv格式文件”的问题）
　　比如你的Flv文件名称是a.flv,在虚拟主机上建一个名为“a.flv”的目录，在此目录下放你的Flv格式文件，将其改名为：index.htm,这样就行了，播放器中的文件名保持原样不动,这样就可以了。

　　按客户要求把VCD处理成FLASH视频流FLV文件后放到网页上后。FLV文件传到客户网站进行调用，既然服务器不支持。。。。其实要支持也是很容易的事情，不过服务商说不支持给客户解释扩展名。。。。真晕。。。那就只能想着只有用WINDOWS MEDIAPLAYER的媒体嵌入到网页播放，不过大家也看过，那个放在网页中很难看的。。。于是想到了一个办法，主机不支持FLV，难道不支持SWF 吗？然后去FTP把传上去的FLV改扩展名为SWF。。。然后在FLASH媒体播放器中把FLV媒体地址改成这个改过扩展名为SWF的FLV文件，即现在的假SWF文件地址。最后一放，成功了。原来流媒体播放器只要你设置类型为FLA文件，不管你给的地址文件名是什么，他都以FLA文件播放方式进行播放。有了这个办法，大家主机不支持FLV文件，也不必再苦求服务商给你们搞扩展名解析了。不过现在大多数主机还是支持FLV的。
Tags - windows , 2003 , 支持 , flv

如何在网页中播放FLV文件的代码

Wed, 02 Apr 2008 02:24:36 +0000

使用方法：

方法一、js嵌入

直接copy下面代码，修改其中红色部分，即：swf_width、swf_height、texts、files 参数



其中：
幸福的脚丫预告片是标题。
http://vir.jxstnu.edu.cn/xieyunc/product/vcastr/flv/happy_feet.flv 是FLV文件地址。
http://vir.jxstnu.edu.cn/xieyunc/attachment/vcastr22.swf 是FLV文件播放器地址（如果你不会制作，可下载别人的然后上传到自己的空间再调用）。

flv播放器 Vcastr 2.0 下载
http://vir.jxstnu.edu.cn/xieyunc/product/vcastr2/vcastr22.zip

方法二、简单直接传递影片地址

方法三、读取影片xml



其中：http://vir.jxstnu.edu.cn/xieyunc/product/vcastr/vcastr.xml 是播放列表的xml地址

高级选项

<http://vir.jxstnu.edu.cn/xieyunc/attachment/vcastr22.swf?参数A=111&参数B=222&....>

在以上"参数A=111&参数B=222"部分添加参数，使用参数=值的格式，多个参数用&连接，参数数量不限制，注意有2个红色部分http://vir.jxstnu.edu.cn/xieyunc/attachment/vcastr22.swf地方需要修改

例如：

表示影片地址是"http://vir.jxstnu.edu.cn/xieyunc/product/vcastr/flv/happy_feet.flv"，标题是"变形金刚预告片"，控制栏颜色是0xFF6600，控制栏位置在下方。

参数名称参数说明默认值

常见问题

问：Logo 文字无法显示
答：Logo 文字不能支持中文，可以用LogoUrl参数将Logo做成.swf文件或者.png文件。

问：xml 如何设置高级参数
答：如下

问：不能全屏
答：需要升级到flashplayer9.0以上

问：不能退出全屏
答：双击可以进入或退出全屏

问：影片不能拖动进度
答：是由于转换文件格式时候有一些信息丢失,可以使用FLV MetaData Injector修复, 下载地址: http://www.buraks.com/flvmdi ;

问：flv放在自己服务器上就不能播放了
答：是由于您的服务器不支持.flv文件格式下载，修改成其他格式比如.swf，当然，相应的vcastr_file或者vcastr_xml中的flv文件名也要修改成.swf

Tags - flv播放器 , 代码

ASP如何获取客户端真实IP地址

Thu, 14 Feb 2008 09:45:19 +0000

　　要想透过代理服务器取得客户端的真实IP地址，就要使用 Request.ServerVariables("HTTP_X_FORWARDED_FOR") 来读取。不过需要注意的是，并不是每个代理服务器都能用 Request.ServerVariables("HTTP_X_FORWARDED_FOR") 来读取客户端的真实 IP，有些用此方法读取到的仍然是代理服务器的IP。还有一点需要注意：如果客户端没有通过代理服务器来访问，那么用 Request.ServerVariables ("HTTP_X_FORWARDED_FOR") 取到的值将是空的。因此，如果要在程序中使用此方法，须对此进行判断：
　　......
　　userip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
　　If userip = "" Then userip = Request.ServerVariables("REMOTE_ADDR")
　　...... 　　

　　即：如果客户端通过代理服务器，则取 HTTP_X_FORWARDED_FOR 的值，如果没通过代理服务器，就取 REMOTE_ADDR 的值。　　
　　'通用函数：如果不能取客户端真实IP，就会取客户端的代理IP

Tags - asp , 客户端ip

ASP 中常见的错误 80004005 信息

Sun, 03 Feb 2008 06:12:18 +0000

ASP 中常见的错误 80004005 信息
错误信息
Microsoft JET Database Engine 错误 '80004005' 未指定的错误（Provider 错误）
原因：
权限问题，系统缓存目录权限不足
解决方法：
1、把系统盘如 C:\WINNT\Temp 目录权限加上Users可读写权限，或者加上 Everyone 可读取权限
2、把数据库设置为Users为可读写权限
3、把数据库文件所在的目录设置为Users为可读写权限

错误信息
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Microsoft Access 97 Driver] The Microsoft Jet database
Jengine cannot open the file '(unknown)'. It is already opened exclusively
by another user, or you need permission to view its data.

原因：
这个错误发生在当IIS使用匿名帐号(通常是IUSR)时,该帐号在NT中对数据库所在的目录
没有正确的权限.（这就是为什么在Win95和PWS下没问题，因为win95根本就没有目录权限这一说）
检查文件和目录的权限. 确定你能够在该目录中有能够新建和删除临时文件的权限。
这些临时文件其实是数据库建立在同一个目录下的文件, 但是要注意的是，有可能这些文件
也可能建立在别的目录，例如 /Winnt.

使用NT的文件监视程序监视文件失败时到底是访问了什么目录。
这个NT的文件监视程序可以在这个地方下载 http://www.sysinternals.com.
如果你对数据库使用了一个网络地址，例如映射地址，就要检查一下共享文件和目录的权限，

还要检查一下数据源文件（DSN）是否被别的程序标志成为正在使用中，
这些别的程序一般是Visual InterDev，关闭任何一个InterDev中的正打开和数据库连接的项目。
这个错误还可能发生在这种情况：如果在DSN中使用了一个UNC路径（就是通用命名协议），请改用
本地路径进行测试，因为如果对本地数据库使用UNC也可能出错。
还可能发生在这种情况，如果服务器要访问Access中的一个表，而这个表却联接在一个网络服务器上。

错误信息：
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Driver Manager] Data source name not found and no default
driver specified.

原因：
最可能的原因是 ConnectString 是一个在 global.asa 中初始化的 Session 变量，但是 global.asa
却没有正常工作。解决办法是，检查赋值时是否正确：（在你的asp中加入下面的代码）

<%= "'auth_user' is " & request.servervariables("auth_user")%>

<%= "'auth_type' is " & request.servervariables("auth_type")%>

<%= "connection string is " & session("your_connectionstring")%>

% >

还有一个原因就是你在你的 ConnectString 中加入了多余的空格，例如
DSN = MyDSN; Database = Pubs;
试试改成下面这个样子：
PDSN=MyDSN;Database=Pubs;

如果是 global.asa 还没有工作，检查该文件是否在运用程序的根目录中,或者是虚拟目录的根目录中。

还有可能错误出现的原因是 DSN 名称没找着，这可以采用我提供的 id=36767 的办法解决。
最后是检查是否安装了最新的驱动程序，既是否是最新的 MDAC 版本。

Tags - 80004005 , microsoft , jet , database , engine

40种网页常用小技巧--JavaScript

Thu, 31 Jan 2008 09:38:37 +0000

40种网页常用小技巧--JavaScript：
http://haibianguoke.bokee.com/3797684.html