浏览模式: 普通 | 列表
新建文本文档.txt (填写以下内容)
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\WScript.Shell]
@="Windows Script Host Shell Object"
[HKEY_CLASSES_ROOT\WScript.Shell\CLSID]
@="{72C24DD5-D70A-438B-8A42-98424B88AFB8}"
[HKEY_CLASSES_ROOT\WScript.Shell\CurVer]
@="WScript.Shell.1"
保存并重命名为 WScript.reg

把 WScript.reg 导入注册表,再在“开始→ 运行”里输入“regsvr32 WSHom.Ocx”(不包括双引号),确定,就可以回复正常了。

原创日志 可笑的繁体简体之争

[ 2008-12-16 23:15:34 | 作者: admin ]
文字的发展以适应书写为前提,简体的形成也是搜集民间简化写法,不是什么闭门造车的创造产物。
在港台这些沿用传统汉字的地方将繁体说成是正体本无可非议,但是可笑的是大陆的很多软件和网站
也采用正体这个称呼。国人早已熟悉繁体的叫法,搞个正体的称呼在上面一方面让人迷惑,另一方面
这似乎有些妄自菲薄,叫人不快。
繁体中文的英文翻译是traditional chinese,翻译过来的确是正统中文的意思,但是繁体中文和简体中文
的对称称谓无任何褒贬,但是正体中文和简体中文的称谓则对简体明显不公。所以在大家已经熟悉了
繁体中文的大陆,希望大家少用正体中文这样的叫法。

attachments/200812/16_233729_1.jpg
压缩包里有excel格式和access格式2个文件,请下载

点击下载
下面是分别在baidu与google搜索“医院”的搜索结果,从baidu的结果来看,使用者根本不会留意到排在前面的其实就是推广的广告。google的搜索结果中广告位置非常显眼,一目了然。非常遗憾,使用者有知情权,从这个对比来看,baidu似乎忘记了诚信的重要性,为了骗钱,骗客户的广告费而忽视用户体验并非明智之举。只在乎眼前利益和效益报表的公司并不能够为大众接受。我们也希望 baidu可以明白这一点。
attachments/200812/12_094315_1.gif

attachments/200812/12_094328_2.gif

懒人不懒

[ 2008-12-07 20:12:03 | 作者: admin ]
星期天的早上,躺在床上依旧能够感受到空气中飘荡的寒气,
被窝的温暖是让人依恋的,不过肚子已经在叫了
太阳还没有下山,但是我要起床了

下午去衣柜翻翻还有没有能穿的裤子,发觉了躺了很久的几件因为太长而抛弃的牛仔裤,突然脑子里灵光一闪,把它们装进袋子就跑到小区门口去改改短(4元一件),看只有多想办法才能懒的幸福些。
解决办法
除了指定的字段 td 加上x:str 外,还需要在头部加上
<html xmlns:o="urn:schemas-microsoft-com:office:office"
xmlns:x="urn:schemas-microsoft-com:office:excel"
xmlns="http://www.w3.org/TR/REC-html40">

javascript中replace()

[ 2008-11-12 08:09:17 | 作者: admin ]
在javascript中,String的函数replace()简直太让人喜爱了。它灵活而强大的字符替换处理能力,让我不禁想向大家介绍它。

  replace()最简单的算是能力就是简单的字符替换。示例代码如下:

<script language="javascript">
var strM = "javascript is a good script language";
//在此我想将字母a替换成字母A
alert(strM.replace("a","A"));
</script>

  我想大家运行后可以看到结果,它只替换了首字母。但如果加上正则表达式结果就不一样了!呵呵,没错。replace()支持正则表达式,它可以按照正则表达式的规则匹配字符或字符串,然后给予替换!

<script language="javascript">
var strM = "javascript is a good script language";
...

阅读全文…

ASP读取RSS

[ 2008-11-10 10:27:37 | 作者: admin ]
<% @language="VBScript"%>

<%
Function readrss(xmlseed)
dim xmlDoc
dim http
Set http=Server.CreateObject("Microsoft.XMLHTTP")
http.Open "GET",xmlseed,False
http.send
Set xmlDoc=Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.Async=False
xmlDoc.ValidateOnParse=False
xmlDoc.Load(http.ResponseXML)
Set item=xmlDoc.getElementsByTagName("item")
if item.Length<=10 then
%>
<script language="JavaScript">
...

阅读全文…