2010年4月16日
摘要: 今天做项目(excel)时遇到如下情况: 检索 COM 类工厂中 CLSID 为{00024500-0000-0000-C000-000000000046} 的组件时失败,原因是出现以下错误: 80070005。 查阅了一些资料问题得以解决.具体解决方法如下:1:在服务器上安装office的Excel软件.2:在"开始"->"运行"中输入dcomcnfg.exe启动"组件服务"3:依次双击... 阅读全文
posted @ 2010-04-16 12:19 Edwin dong 阅读(581) 评论(0) 推荐(1) 编辑
  2009年3月11日
摘要: html标签:<input type="text" name="txt" onkeydown="event.returnValue=false;" onpaste="return false"/>服务器控件:<asp:TextBox ID="txt" runat="server"onkeydown="event.returnValue=false;" onpaste="retur... 阅读全文
posted @ 2009-03-11 16:26 Edwin dong 阅读(1224) 评论(0) 推荐(0) 编辑
  2009年2月12日
摘要: .net 环境本来昨天用着好好的,今天打开电脑以后,工具箱里面的东西除了html控件之外,其他的都不可用了。不知道为什么,在网上找了一些方法也没有找到具体的解决方式。后来想到重置一下环境,于是重置了一下,搞定了。现在把重置环境的方式告诉一下大家 ,如果又遇到相同问题的,说不定可以用上在vs2005的路径下输入 devenv.exe /resetuserdata 重新设置下环境例如:Microsof... 阅读全文
posted @ 2009-02-12 09:47 Edwin dong 阅读(1069) 评论(2) 推荐(0) 编辑
  2008年4月25日
摘要: javascript 页面关闭 刷新 阅读全文
posted @ 2008-04-25 14:26 Edwin dong 阅读(7856) 评论(6) 推荐(0) 编辑
  2008年4月22日
摘要: DataList嵌套 激发事件 阅读全文
posted @ 2008-04-22 13:51 Edwin dong 阅读(1157) 评论(3) 推荐(0) 编辑
  2007年11月2日
摘要: 映射路径 不正确 iis管理器 asp.net版本 阅读全文
posted @ 2007-11-02 10:11 Edwin dong 阅读(725) 评论(1) 推荐(0) 编辑
  2007年10月31日
摘要: windows server 2003 sp1 产品密钥 安装.net2005 阅读全文
posted @ 2007-10-31 13:24 Edwin dong 阅读(810) 评论(1) 推荐(0) 编辑
  2007年9月22日
摘要: jit 调试失败,出现以下错误:拒绝访问。 jit调试由用户帐户"NT AUTHORITY\NETWORK SERVICE" 启动 阅读全文
posted @ 2007-09-22 14:01 Edwin dong 阅读(4557) 评论(1) 推荐(0) 编辑
  2007年6月29日
摘要: 缓存 阅读全文
posted @ 2007-06-29 16:47 Edwin dong 阅读(21545) 评论(7) 推荐(3) 编辑
  2007年6月26日
摘要: isNull() 阅读全文
posted @ 2007-06-26 17:08 Edwin dong 阅读(14867) 评论(2) 推荐(0) 编辑
  2007年6月20日
摘要: 查询数据库中满足条件的特定行数据 Row_Number() OVER() 阅读全文
posted @ 2007-06-20 16:24 Edwin dong 阅读(1016) 评论(0) 推荐(0) 编辑
  2007年6月18日
摘要: HttpRuntime httpRuntime maxRequestLength 阅读全文
posted @ 2007-06-18 18:00 Edwin dong 阅读(4956) 评论(1) 推荐(0) 编辑
  2007年6月6日
摘要: 无法在证书存储区中找到清单签名证书 阅读全文
posted @ 2007-06-06 16:23 Edwin dong 阅读(6454) 评论(6) 推荐(1) 编辑
  2007年5月31日
摘要: 使用警告、提示和确认 confirm alert prompt 阅读全文
posted @ 2007-05-31 14:35 Edwin dong 阅读(524) 评论(0) 推荐(0) 编辑
  2007年5月24日
摘要: 无法在web服务器上启动调试,未将项目配置为进行调试 阅读全文
posted @ 2007-05-24 17:24 Edwin dong 阅读(2850) 评论(3) 推荐(0) 编辑
  2007年5月15日
摘要: FileUpload 多个文件同时上传 HttpPostedFile 阅读全文
posted @ 2007-05-15 16:49 Edwin dong 阅读(3695) 评论(6) 推荐(1) 编辑
  2007年5月12日
摘要: 'sys'未定义 阅读全文
posted @ 2007-05-12 10:54 Edwin dong 阅读(3100) 评论(3) 推荐(0) 编辑
  2007年5月11日
摘要: Access 连接数据库 输出页面 阅读全文
posted @ 2007-05-11 09:46 Edwin dong 阅读(684) 评论(1) 推荐(0) 编辑
  2007年5月9日
摘要: Attributes onpropertychange 阅读全文
posted @ 2007-05-09 09:54 Edwin dong 阅读(3423) 评论(0) 推荐(0) 编辑
  2007年4月18日
摘要: automation服务器不能创建对象 阅读全文
posted @ 2007-04-18 17:45 Edwin dong 阅读(76877) 评论(55) 推荐(0) 编辑

<% Function googleColor(value, random) Dim colorArray colorArray = Split(value, ",") googleColor = colorArray(random Mod (UBound(colorArray) + 1)) End Function Function googleScreenRes() Dim screenRes, delimiter, resArray screenRes = Request.ServerVariables("HTTP_UA_PIXELS") delimiter = "x" If IsEmpty(screenRes) Then screenRes = Request.ServerVariables("HTTP_X_UP_DEVCAP_SCREENPIXELS") delimiter = "," End If resArray = Split(screenRes, delimiter, 2) If (UBound(resArray) + 1) = 2 Then googleScreenRes = "&u_w=" & resArray(0) & "&u_h=" & resArray(1) End If End Function Function googleDcmguid() Dim dcmguid dcmguid = Request.ServerVariables("HTTP_X_DCMGUID") If Not IsEmpty(dcmguid) Then googleDcmguid = "&dcmguid=" & dcmguid End If End Function Dim googleTime, googleDt, googleScheme, googleHost googleTime = DateDiff("s", "01/01/1970 00:00:00", Now()) googleDt = (1000 * googleTime) + Round(1000 * (Timer - Int(Timer))) googleScheme = "http://" If StrComp(Request.ServerVariables("HTTPS"), "on") = 0 Then googleScheme = "https://" googleHost = Server.URLEncode(googleScheme & Request.ServerVariables("HTTP_HOST")) Dim googleAdUrl, googleAdOutput googleAdUrl = "http://pagead2.googlesyndication.com/pagead/ads?" &_ "ad_type=text_image" &_ "&channel=" &_ "&client=ca-mb-pub-6539345765131754" &_ "&dt=" & googleDt &_ "&format=mobile_single" &_ "&host=" & googleHost &_ "&ip=" & Server.URLEncode(Request.ServerVariables("REMOTE_ADDR")) &_ "&markup=xhtml" &_ "&oe=utf8" &_ "&output=xhtml" &_ "&ref=" & Server.URLEncode(Request.ServerVariables("HTTP_REFERER")) &_ "&url=" & googleHost & Server.URLEncode(Request.ServerVariables("URL")) &_ "&useragent=" & Server.URLEncode(Request.ServerVariables("HTTP_USER_AGENT")) &_ googleScreenRes() &_ googleDcmguid() Set googleAdOutput = Server.CreateObject("MSXML2.ServerXMLHTTP") googleAdOutput.Open "GET", googleAdUrl, false googleAdOutput.Send Response.Write(googleAdOutput.responseText) %>