示例：搜索包含布兰妮“Britney”或者披头士“Beatles”、或者两者均有的中文网页。 搜索：“britney OR beatles” 结果：已搜索有关britney OR beatles的中文(简体)网页。共约有14,600项查询结果，这是第1-10项。搜索用时0.08秒。 搜索：“布兰妮 OR 披头士” 结果：找不到和您的查询-布兰妮 OR 披头士-相符的网页。
示例：搜索包含“Who am I ?”的网页。如果用“"who am i ?"”，“Who”、“I”、“?”会被省略掉，搜索将只用“am”作关键字，所以应该用强制搜索。 搜索：“"+who +am +i"” 结果：已向英特网搜索"+who +am +i". 共约有362,000项查询结果，这是第1-10项。搜索用时0.30秒。
输入“http://groups.google.com/”后，便进入GOOGLE新闻组界面。可惜现在还没有中文界面。因为新闻组中的帖子实在是多，所以我点击“Advaced Groups Search”进入高级搜索界面http://groups.google.com/advanced_group_search。新闻组高级搜索界面提供对关键字、新闻组、主题、作者、帖子序号、语言和发布日期的条件搜索。其中作者项指作者发帖所用的唯一识别号电子信箱。比如要在alt.chinese.text内搜索著名老牌网络写手图雅的帖子，可以用下列指令“group:alt.chinese.text author:tuya@ccmail.uoregon.edu”。不过一般而言，我更推荐使用图形搜索界面，方便而且直观。
不过，目前只能在英文状态GOOGLE下实现这个功能。进入GOOGLE的设置页面，http://www.google.com/preferences，有一个“BETA: Enable translation of search results into your interface language. ”的选项，把它选中，就OK了。
[PDF] www.usi.net/pdf/outsoucing-ecommerce.pdf Outsourcing Electronic Commerce Business Case White Paper By: John P. Sahlin, Product Marketing Professonial (PMP) Implementation Manager, Web Engineering ... 一般文字档 - 类似网页
分析一：提供MP3的网站，通常会建立一个叫做MP3的目录，目录底下分门别类的存放各种MP3乐曲。所以，可以用INURL语法迅速找到这类目录。现在用这个办法找找老歌“say you say me”。 搜索：“"say you say me" inurl:mp3” 结果：已向英特网搜索inurl:mp3 "say you say me". 共约有155项查询结果，这是第1-10项。搜索用时0.17秒。
分析二：也可以通过网页标题，找到这类提供MP3的网页。 搜索：“"say you say me" intitle:mp3” 结果：已向英特网搜索"say you say me" intitle:mp3. 共约有178项查询结果，这是第1-10项。搜索用时0.73秒。
} else print("\t\t\t<div style=\"FONT:normal normal bold 8pt 'Verdana';COLOR:#990000;TEXT-INDENT:20pt;MARGIN-BOTTOM:15px\">\"Session\" has been not started !</div>\n");
if not bInit then Set IframeID=document.frames("Dvbbs_Composition")
if IsObject(IframeID.document.body) then IframeID.document.body.innerHTML=document.all.initCode.innerHTML if err.number=0 then bInit=True Call clearInterval(mTimer) end if end if
end if
end function
function SetVals() on error resume next
Dim CodeType Dim strCode Dim IframeID
Set IframeID=document.frames("Dvbbs_Composition")
if not IsObject(IframeID) then msgbox "test" exit function end if
if CodeType=1 then document.Hidden.elementCode.value =IframeID.document.body.innerHTML end if
if CodeType=2 then document.Hidden.elementCode.value =addHtmlAdv(preProcess(IframeID.document.body.innerHTML)) end if
if CodeType=3 then document.Hidden.elementCode.value =ubbCode(preProcess(IframeID.document.body.innerHTML)) end if
if document.Hidden.elementCode.value<>"" then
strCode=document.Hidden.elementCode.value
if CodeType=2 then if bbsType="HTML" then strCode=Replace(strCode," "," ",1,-1,1) strCode=Replace(strCode,"<BR>",chr(13),1,-1,1)
adv=chr(13)&chr(13)&"-----------------------------------------------------------"&chr(13) adv=adv&"以上文字、图片由易我秀输出，你也想这么酷吗？"&chr(13) adv=adv&"<a href=http://www.eoshow.com/download/install1.html?f=bbshtml target=_blank>http://www.eoshow.com/download/install1.html</a>" else 'adv=chr(13)&chr(13)&"-----------------------------------------------------------"&chr(13) 'adv=adv&"以上文字、图片由易我秀输出，你也想这么酷吗？"&chr(13) 'adv=adv&"<a href=http://www.eoshow.com/download/install1.html?fb=email target=_blank>http://www.eoshow.com/download/install1.html</a>" end if end if
if CodeType=3 then adv=chr(13)&chr(13)&"-----------------------------------------------------------"&chr(13) adv=adv&"以上文字、图由易我秀输出，你也想这么酷吗？"&chr(13) adv=adv&"http://www.eoshow.com/download/install1.html" end if
if iLib=0 then '大表情替换 For i=0 to Ubound(strURLArray_EM1) strTempArray=split(strURLArray_EM1(i,0)," ") For j=0 to Ubound(strTempArray) htmlCode=Replace(htmlCode,strTempArray(j),"<img src="""&strURL(5)&strURLArray_EM1(i,1)&""">") Next Next
else
'动态表情替换 For i=0 to Ubound(strURLArray_EM2) strTempArray=split(strURLArray_EM2(i,0)," ") For j=0 to Ubound(strTempArray) htmlCode=Replace(htmlCode,strTempArray(j),"<img src="""&strURL(6)&strURLArray_EM2(i,1)&""">") Next Next
end if
Set objRegExp=new RegExp objRegExp.IgnoreCase =true objRegExp.Global=True
For i=1 to len(strContent) strTmp= Mid(strContent,i,1) iAsc=asc(strTmp)
if strTmp=" " then strTmp=" " end if
if strTmp=chr(13) then strTmp="<br>" end if
if isNumeric(strTmp) then strTmp="<img src="""&strURL(4)&strTmp&".gif"&""">" else
if (iAsc>0) and (iAsc<123) then '英文库 For j=0 to Ubound(strURLArray_EN) if Lcase(strTmp)=strURLArray_EN(j,0) then strTmp="<img src="""&strURL(iLib)&strURLArray_EN(j,1)&""">" exit for end if Next
else '中文库 For j=0 to Ubound(strURLArray_CN) if Lcase(strTmp)=strURLArray_CN(j,0) then strTmp="<img src="""&strURL(3)&strURLArray_CN(j,1)&""">" exit for end if Next
end if
end if strReplace=strReplace&strTmp
Next
'还原回复标签中的内容 objRegExp.Pattern="\[QUOTE\][\S\s]*\[\/QUOTE\]" Set Matches = objRegExp.Execute(htmlCode)
For Each Match in Matches strReplace=Replace(strReplace,"#&",Match.value,1,1,1) Next '还原所有HTML标记内的内容 objRegExp.Pattern="<[^>]*>" Set Matches = objRegExp.Execute(htmlCode)
For Each Match in Matches strReplace=Replace(strReplace,"#@",Match.value,1,1,1) Next
'还原http网址 objRegExp.Pattern = "((http|https|ftp|rtsp|mms):(\/\/|\\\\)[A-Za-z0-9\./=\?%\-&_~`@[\]\':+!]+)" Set Matches = objRegExp.Execute(htmlCode)
For Each Match in Matches strReplace=Replace(strReplace,"#^",Match.value,1,1,1) Next
早在读书时，有些喜欢这个工具，收集了相关资料。汗，记性不好，把资料又放四川老家了，刚好在GSN小组上看到这篇文章，就转过来，留个存档~~~~ 启动 Debug，它是可用于测试和调试 MS-DOS 可执行文件的程序。 Debug [[drive:][path] filename [parameters]] 参数 [drive:][path] filename 指定要测试的可执行文件的位置和名称。 parameters 指定要测试的可执行文件所需要的任何命令行信息。 ++ 说明 使用 Debug 命令但不指定要测试的文件 如果使用没有位置和文件名的 Debug 命令，然后键入所有的 Debug 命令以响应 Debug 提示符，连字符 (-)。 Debug 命令 以下是 Debug 命令列表： ? 显示 Debug 命令列表。 a 汇编 8086/8087/8088 记忆码。 c 比较内存的两个部分。 d 显示部分内存的内容。 e 从指定地址开始，将数据输入到内存。 f 使用指定值填充一段内存。 g 运行在内存中的可执行文件。 h 执行十六进制运算。 i 显示来自特定端口的 1 字节值。 l 将文件或磁盘扇区内容加载到内存。 m 复制内存块中的内容 /n 为 l 或 w 命令指定文件，或者指定正在测试的文件的参数。 o 向输出端口发送 1 个字节的值。 p 执行循环、重复的字符串指令、软件中断或子例程。 q 停止 Debug 会话。 r 显示或改变一个或多个寄存器。 s 在部分内存中搜索一个或多个字节值的模式。 t 执行一条指令，然后显示所有寄存器的内容、所有标志的状态和 Debug 下一步要执行的指令的解码形式。 u 反汇编字节并显示相应的原语句。 w 将被测试文件写入磁盘。 xa 分配扩展内存。 xd 释放扩展内存。 xm 映射扩展内存页。 xs 显示扩展内存的状态。 分隔命令参数 所有 Debug 命令都接受参数，除了 q 命令之外。可以用逗号或空格分隔参数，但是只有在两个十六进制值之间才需要这些分隔符。因此，以下命令等价： dcs:100 110 d cs:100 110 d,cs:100,110 指定有效地址项 Debug 命令中的 address 参数指定内存位置。Address 是一个包含字母段记录的二位名称或一个四位字段地址加上一个偏移量。可以忽略段寄存器或段地址。a，g，l，t，u 和 w 命令的默认段是 CS。所有其他命令的默认段是 DS。所有数值均为十六进制格式。 有效地址如下： CS:0100 04BA:0100 在段名和偏移量之间要有冒号。 指定有效范围项 Debug 命令中的 range 参数指定了内存的范围。可以为 range 选择两种格式：起始地址和结束地址，或者起始地址和长度范围（由 l 表示）。 例如，下面的两个语法都可以指定从 CS:100 开始的 16 字节范围： cs:100 10f cs:100 l 10 ++ Debug 子命令 选择 Debug 命令以获得详细信息。 Debug:A（汇编） Debug:C（比较） Debug（转储） Debug:E（键入） Debug:F（填充） Debug:G（转向） Debug:H（十六进制） Debug:I（输入） Debug:L（加载） Debug:M（移动） Debug:N（名称） Debug:O（输出） Debug:P（执行） Debug:Q（退出） Debug:r（寄存器） Debug:s（搜索） Debug:T（跟踪） Debug:U（反汇编） Debug:W（写入） Debug:XA（分配扩展内存） Debug:XD（取消分配扩展内存） Debug:XM（映射扩展内存页） Debug:XS（显示扩展内存状态） ***********************Debug子命令****************************** Debug:A（汇编） 直接将 8086/8087/8088 记忆码合并到内存。 该命令从汇编语言语句创建可执行的机器码。所有数值都是十六进制格式，必须按一到四个字符输入这些数值。在引用的操作代码（操作码）前指定前缀记忆码。 a [address] 参数 address 指定键入汇编语言指令的位置。对 address 使用十六进制值，并键入不以“h”字符结尾的每个值。如果不指定地址，a 将在它上次停止处开始汇编。 有关将数据输入到指定字节中的信息，请单击“相关主题”列表中的 Debug E（键入）。 有关反汇编字节的信息，请单击“相关主题”列表中的 Debug U（反汇编）。 范例 a 命令支持所有形式的间接注册命令，如下例所示： add bx,34[bp+2].[si-1] pop [bp+di] push [si] ) 还支持所有操作码同义词，如下例所示： loopz 100 loope 100 ja 200 jnbe 200 对于 8087 操作码，必须指定 wait 或 fwait 前缀，如下例所示： fwait fadd st,st(3) ; this line assembles ; an fwait prefix 说明 使用记忆码 段的替代记忆码为 cs:、ds:、es: 和 ss:。远程返回的记忆码是 retf。字符串处理的记忆码必须明确声明字符串大小。例如，使用 movsw 可以移动 16 位的字串，使用 movsb 可以移动 8 位字节串。 汇编跳转和调用 汇编程序根据字节替换自动将短、近和远的跳转及调用汇编到目标地址。通过使用 near 或 far 前缀可以替代这样的跳转或调用，如下例所示： -a0100:0500 0100:0500 jmp 502 ; a 2-byte short jump 0100:0502 jmp near 505 ; a 3-byte near jump 0100:0505 jmp far 50a ; a 5-byte far jump 可以将 near 前缀缩写为 ne。 区分字和字节内存位置 当某个操作数可以引用某个字内存位置或者字节内存位置时，必须用前缀 word ptr 或者前缀 byte ptr 指定数据类型。可接受的缩写分别是 wo 和 by。以下范例显示两种格式： dec wo [si] neg byte ptr [128] 指定操作数 Debug 使用包括在中括号 ([ ]) 的操作数引用内存地址的习惯用法。这是因为另一方面 Debug 不能区分立即操作数和内存地址的操作数。以下范例显示两种格式： mov ax,21 ; load AX with 21h mov ax,[21] ; load AX with the ; contents of ; memory location 21h 使用伪指令 使用 a 命令提供两个常用的伪指令：db 操作码，将字节值直接汇编到内存，dw 操作码，将字值直接汇编到内存。以下是两个伪指令的范例： db 1,2,3,4,"THIS IS AN EXAMPLE" db 'THIS IS A QUOTATION MARK:"' db "THIS IS A QUOTATION MARK:'" dw 1000,2000,3000,"BACH" ++ Debug:C（比较） 比较内存的两个部分。 c range address 参数 range 指定要比较的内存第一个区域的起始和结束地址，或起始地址和长度。有关有效的 range 值的信息，请单击“相关主题”列表中的“Debug 说明”。 address 指定要比较的第二个内存区域的起始地址。有关有效 address 值的信息，请单击“相关主题”列表中的“Debug 说明”。 ++ 范例 以下命令具有相同效果： c100,10f 300 c100l10 300 每个命令都对 100h 到 10Fh 的内存数据块与 300h 到 30Fh 的内存数据块进行比较。 Debug 响应前面的命令并显示如下信息（假定 DS = 197F）： 197F:0100 4D E4 197F:0300 197F:0101 67 99 197F:0301 197F:0102 A3 27 197F:0302 197F:0103 35 F3 197F:0303 197F:0104 97 BD 197F:0304 197F:0105 04 35 197F:0305 197F:0107 76 71 197F:0307 197F:0108 E6 11 197F:0308 197F:0109 19 2C 197F:0309 197F:010A 80 0A 197F:030A 197F:010B 36 7F 197F:030B 197F:010C BE 22 197F:030C 197F:010D 83 93 197F:030D 197F:010E 49 77 197F:030E 197F:010F 4F 8A 197F:030F 注意列表中缺少地址 197F:0106 和 197F:0306。这表明那些地址中的值是相同的。 ++ 说明 如果 range 和 address 内存区域相同，Debug 将不显示任何内容而直接返回到 Debug 提示符。如果有差异，Debug 将按如下格式显示： address1 byte1 byte2 addess2 ++++ Debug（转储） 显示一定范围内存地址的内容。 d [range] 参数 range 指定要显示其内容的内存区域的起始和结束地址，或起始地址和长度。有关有效的 range 值的信息，请单击“相关主题”列表中的“Debug 说明”。如果不指定 range，Debug 程序将从以前 d 命令中所指定的地址范围的末尾开始显示 128 个字节的内容。 有关显示寄存器内容的信息，请单击“相关主题”列表中的 Debug R（寄存器）。 ++ 范例 假定键入以下命令： dcs:100 10f Debug 按以下格式显示范围中的内容： 04BA:0100 54 4F 4D 00 53 41 57 59-45 52 00 00 00 00 00 00 TOM.SAWYER...... 如果在没有参数的情况下键入 d 命令，Debug 按以前范例中所描述的内容来编排显示格式。显示的每行以比前一行的地址大 16 个字节（如果是显示 40 列的屏幕，则为 8 个字节）的地址开头。 对于后面键入的每个不带参数的 d 命令，Debug 将紧接在最后显示的命令后立即显示字节内容。 如果键入以下命令，Debug 将从 CS:100 开始显示 20h 个字节的内容： dcs:100 l 20 如果键入以下命令，Debug 将显示范围从 CS 段的 100h 到 115h 中所有字节的内容： dcs:100 115 ++ 说明 当使用 d 命令时，Debug 以两个部分显示内存内容：十六进制部分（每个字节的值都用十六进制格式表示）和 ASCII 码部分（每个字节的值都用 ASCII 码字符表示)。每个非打印字符在显示的 ASCII 部分由句号 (.) 表示。每个显示行显示 16 字节的内容，第 8 字节和第 9 字节之间有一个连字符。每个显示行从 16 字节的边界上开始。 ++ Debug:E（键入） 将数据输入到内存中指定的地址。 可以按十六进制或 ASCII 格式键入数据。以前存储在指定位置的任何数据全部丢失。 e address [list] 参数 address 指定输入数据的第一个内存位置。 list 指定要输入到内存的连续字节中的数据。 有关集成记忆码的信息，请单击“相关主题”列表中的 Debug A（汇编）。 有关显示内存部分内容的信息，请单击“相关主题”列表中的 Debug D （转储）。 ++ 范例 假定键入以下命令： ecs:100 Debug 按下面的格式显示第一个字节的内容： 04BA:0100 EB. 要将该值更改为 41，请在插入点键入 41，如下所示： 04BA:0100 EB.41_ 可以用一个 e 命令键入连续的字节值。在键入新值后按 SPACEBAR（空格键），而不是按 ENTER 键。Debug 显示下一个值。在此范例中，如果按三次 SPACEBAR（空格键），Debug 将显示下面的值： 04BA:0100 EB.41 10. 00. BC._ 要将十六进制值 BC 更改为 42，请在插入点键入 42，如下所示： 04BA:0100 EB.41 10. 00. BC.42_ 假定决定值 10 应该是 6F。要纠正该值，请按 HYPHEN 键两次以返回到地址 0101（值 10）。Debug 显示以下内容： 04BA:0100 EB.41 10. 00. BC.42- 04BA:0102 00.- 04BA:0101 10._ 在插入点键入 6f 更改值，如下所示： 04BA:0101 10.6f_ 按 ENTER 停止 e 命令并返回到 Debug 提示符下。 以下是字符串项的范例： eds:100 "This is the text example" 该字符串将从 DS:100 开始填充 24 个字节。 ++ 说明 使用 address 参数 如果在没有指定可选的 list 参数的值情况下指定 address 的值，Debug 将显示地址和内容，在下一行重复地址，并等待您的输入。此时，您可以执行下列操作之一： · 替换字节值。为此，请在当前值后键入新值。如果您键入的值不是有效的十六进制值，或该值包含两个以上的数字，则 Debug 不会回显无效或额外的字符。 · 进入下一个字节。为此，请按 SPACEBAR（空格键）。要更改该字节中的值，请在当前值后键入新值。如果按 SPACEBAR（空格键）时，移动超过了 8 位界限，Debug 程序将显示新的一行并在行首显示新地址。 · 返回到前一个字节。为此，请按 HYPHEN 键 (-)。可以反复按 HYPHEN 键 (-) 向后移动超过多个字节。在按 HYPHEN 时，Debug 开始新行并显示当前地址和字节值。 · 停止执行 e 命令。为此，请按 ENTER 键。在任何字节位置都可以按 ENTER。 使用 list 参数 如果指定 list 参数的值，随后的 e 命令将使用列表中的值替换现有的字节值。如果发生错误，将不更改任何字节值。 List 值可以是十六进制字节或字符串。使用空格、逗号或制表符来分隔值。必须将字符串包括在单或双引号中。 ++++ Debug:F（填充） 使用指定的值填充指定内存区域中的地址。 可以指定十六进制或 ASCII 格式表示的数据。任何以前存储在指定位置的数据将会丢失。 f range list 参数 range 指定要填充内存区域的起始和结束地址，或起始地址和长度。关于有效的 range 值的信息，请单击“相关主题”列表中的“Debug 说明”。 list 指定要输入的数据。List 可以由十六进制数或引号包括起来的字符串组成。 ++ 范例 假定键入以下命令： f04ba:100l100 42 45 52 54 41 作为响应，Debug 使用指定的值填充从 04BA:100 到 04BA:1FF 的内存位置。Debug 重复这五个值直到 100h 个字节全部填满为止。 ++ 说明 使用 range 参数 如果 range 包含的字节数比 list 中的数值大，Debug 将在 list 中反复指派值，直到 range 中的所有字节全部填充。 如果在 range 中的任何内存损坏或不存在，Debug 将显示错误消息并停止 f 命令。 使用 list 参数 如果 list 包含的数值多于 range 中的字节数，Debug 将忽略 list 中额外的值。 ++ Debug:G（转向） 运行当前在内存中的程序。 g [=address] [breakpoints] 参数 =address 指定当前在内存中要开始执行的程序地址。如果不指定 address，Windows 2000 将从 CS:IP 寄存器中的当前地址开始执行程序。 breakpoints 指定可以设置为 g 命令的部分的 1 到 10 个临时断点。 有关执行循环、重复的字符串指令、软件中断或子程序的信息，请单击“相关主题”列表中的 Debug P（执行）。 有关执行指令的信息，请单击“相关主题”列表中的 Debug T（跟踪）。 范例 假定键入以下命令： gcs:7550 Windows 2000 运行当前内存中的程序，直到执行到 CS 段中的断点地址 7550 为止。Debug 将显示寄存器的内容和标志的状态并结束 g 命令。 以下命令设置两个断点： gcs:7550, cs:8000 如果在 Debug 遇到断点之后再次键入 g 命令，将从在断点之后的指令开始执行，而不是在通常的开始地址执行。 ++ 说明 使用 address 参数 必须在 address 参数之前使用等号 (=) 以区分开始地址 (address) 和断点地址 (breakpoints)。 指定断点 程序在它遇到的第一个断点处停止，而不论您在 breakpoint 列表的什么位置键入断点。Debug 在每个断点处用中断代码代替原始指令。 当程序到达断点时，Debug 将所有断点地址恢复到它们的最初指令并显示所有寄存器的内容、所有标记的状态以及最后执行指令的解码形式。Debug 显示的信息与使用 Debug r（寄存器）命令并指定断点时所显示的信息相同。 如果不在断点处停止程序，Debug 程序将不使用原始指令替换中断代码。 设置断点的限制 可以只在包含 8086 操作代码（操作码）的第一个字节的地址上设置断点。如果设置了 10 个以上的断点，Debug 将显示以下信息： bp error 对用户堆栈指针的要求 用户堆栈指针必须有效且必须有 6 个字节可用于 g 命令。该命令使用 iret 指令跳转到正在被测试的程序。Debug 设置用户堆栈指针并将用户标志、代码段寄存器和指令指针压入用户堆栈。（如果用户堆栈无效或太小，操作系统可能会失败。）Debug 在指定的断点处设置中断代码 (0CCh)。 重新启动程序 不要在 Windows 2000 显示以下消息后尝试重新启动程序； Program terminated normally 要正确地运行程序，必须通过使用 Debug n（名称）和 l（加载）命令重新加载该程序。 ++++ Debug:H（十六进制） 对指定的两个参数执行十六进制运算。 h value1 value2 参数 value1 代表从 0 到 FFFFh 范围内的任何十六进制数字。 value2 代表从 0 到 FFFFh 范围内第二个十六进制数字。 ++ 范例 假定键入以下命令： h19f 10a Debug 执行运算并显示以下结果。 02A9 0095 ++ 说明 Debug 首先将指定的两个参数相加，然后从第一个参数中减去第二个参数。这些计算的结果显示在一行中：先计算和，然后计算差。 ++++ Debug:I（输入） 从指定的端口读取并显示一个字节值。 i port 参数 port 按地址指定输入端口。地址可以是 16 位的值。 有关将字节值发送到输出端口的信息，请单击“相关主题”列表中的 Debug O（输出）。 ++ 范例 假定键入以下命令： i2f8 同时假定端口的字节值是 42h。Debug 读取该字节，并将其值显示如下： 42 ++ Debug:L（加载） 将某个文件或特定磁盘扇区的内容加载到内存。 要从磁盘文件加载 BX:CX 寄存器中指定的字节数内容，请使用以下语法： l [address] 要略过 Windows 2000 文件系统并直接加载特定的扇区，请使用以下语法： l address drive start number 参数 address 指定要在其中加载文件或扇区内容的内存位置。如果不指定 address，Debug 将使用 CS 寄存器中的当前地址。 drive 指定包含读取指定扇区的磁盘的驱动器。该值是数值型：0 = A, 1 = B, 2 = C 等。 start 指定要加载其内容的第一个扇区的十六进制数。 number 指定要加载其内容的连续扇区的十六进制数。只有要加载特定扇区的内容而不是加载 debug 命令行或最近的 Debug n（名称）命令中指定的文件时，才能使用 drive、start 和 number 参数。 有关指定用于 l 命令的文件的信息，请单击“相关主题”列表中的 Debug n（名称）。 有关写入调试到磁盘的文件的信息，请单击“相关主题”列表中的 Debug w（写入）。 ++ 范例 假定启动 Debug 并键入以下命令： nfile.com 现在可以键入 l 命令以加载 File.com。Debug 将加载文件并显示 Debug 提示符。 假定需要从驱动器 C 将起始逻辑扇区为 15 (0Fh) 的 109 (6Dh) 个扇区的内容加载到起始地址为 04BA:0100 的内存中。为此，请键入以下命令： l04ba:100 2 0f 6d ++ 注意 使用不带参数的 l 命令 当使用不带参数的 l 命令时，在 debug 命令行上指定的文件将加载到内存中，从地址 CS:100 开始。Debug 同时将 BX 和 CX 寄存器设置为加载的字节数。如果不在 debug 命令行指定文件，所装入的文件将是最近使用 n 命令经常指定的文件。 使用具有 address 参数的 1 命令 如果使用带 address 参数的 l 命令，Debug 将从内存位置 address 开始加载文件或指定扇区的内容。 使用带全部参数的 l 命令 如果使用带所有参数的 l 命令，Debug 将加载指定磁盘扇区的内容而不是加载文件。 加载特定扇区的内容 指定范围内的每个扇区均从 drive 读取。Debug 从 start 开始加载，直到在 number 中指定的扇区数中的内容全部被加载。 加载 .exe 文件 Debug 忽略 .exe 文件的地址 address 参数。如果指定 .exe 文件，Debug 将文件重新定位到 .exe 文件的标题中指定的加载地址。在 .exe 文件被加载到内存前，标题自身从 .exe 文件脱离，因此磁盘上的 .exe 文件大小与内存中的不同。如果要检查整个 .exe 文件，请使用不同的扩展名重命名文件。 打开十六进制文件 Debug 将具有 .hex 扩展名的文件认为十六进制格式文件。键入不带参数的 l 命令，可以加载从十六进制文件中指定的地址处开始的十六进制文件。如果键入的 l 命令包含 address 参数，Debug 将把指定的地址加到在十六进制文件中找到的地址上，以确定起始地址。 ++++ Debug:M（移动） 将一个内存块中的内容复制到另一个内存块中。 m range address 参数 range 指定要复制内容的内存区域的起始和结束地址，或起始地址和长度。 address 指定要将 range 内容复制到该位置的起始地址。 ++ 范例 假定键入以下命令： mcs:100 110 cs:500 Debug 首先将 CS:110 地址中的内容复制到地址 CS:510 中，然后将 CS:10F 地址中的内容复制到 CS:50F 中，如此操作直至将 CS:100 地址中的内容复制到地址 CS:500 中。要查看结果，请使用 Debug d（转储）命令，并使用 m 命令指定目标地址。 ++ 说明 复制操作对现有数据的影响 如果新数据没有写入正在被复制的数据块中的地址，则源数据将保持不变。但是，如果目标块已经包含数据(就象它在覆盖副本操作中一样)，则将改写该数据。（覆盖复制操作是指那些目标数据块部分内容覆盖原数据块部分内容的操作。） 执行覆盖复制操作 m 命令执行目标地址的覆盖复制操作，而不丢失数据。将改写的地址内容首先复制。因此，如果将较高位地址的数据复制到较低位地址，则复制操作从原块的最低位地址开始并向最高位地址进行。反之，如果要将数据从低地址复制到高地址，复制操作从原块的最高地址开始，向最低地址进行。 ++++ Debug:N（名称） 指定 Debug l（加载）或 w（写入）命令的可执行文件的名称，或者指定正在调试的可执行文件的参数。 n [drive:][path] filename 要指定测试的可执行文件的参数，请使用以下语法： n file-parameters 参数 如果在没有参数的情况下使用，则 n 命令清除当前规范。 [drive:][path] filename 指定要测试的可执行文件的位置和名称。 file-parameters 为正在测试的可执行文件指定参数和开关。 有关将文件或指定磁盘扇区的内容加载到内存中的信息，请单击“相关主题”列表中的 Debug L（加载）。 有关写入调试到磁盘的文件的信息，请单击“相关主题”列表中的 Debug W（写入）。 ++ 范例 假定已经启动 Debug，并加载了正在调试的程序 Prog.com。接着您决定为 Prog.com 指定两个参数并运行此程序。以下是此范例的命令序列： debug prog.com nparam1 param2 g 在这种情况下，Debug g（转向）命令会运行该程序，就好像您已在 Windows 2000 命令提示符后键入了如下命令： prog param1 param2 所以，测试和调试反映 Prog.com 通常的运行时间环境。 在下面的命令序列中，第一个 n 命令将 File1.exe 指定为后接的 l（加载）命令的文件，该命令将 File1.exe 加载到内存。第二个 n 命令指定 File1.exe 将使用的参数。最后，g 命令将运行 File1.exe 文件，就好像您在 Windows 2000 命令行中键入了 File1 File2.dat File2.dat 一样。 nfile1.exe l nfile2.dat file3.dat g 注意 · 不要在 n 命令的第二种形式后使用 l 命令。还要注意，如果现在使用 w（写入）命令，Windows 2000 将使用名称 File2.dat 保存正在调试的文件 File1.exe。为避免出现此结果，应该总是在 l 或 w 命令之前立即使用 n 命令的第一种形式。 ++ 说明 n 命令的两个用途 可以按两种方式使用 n 命令。首先，您可以使用它以指定后面的 l（加载）或 w（写入）命令所使用的文件。如果在没有命名所调试文件的情况下启动 Debug，必须在使用 l 命令加载文件之前使用命令 nfilename。在 CS:5C 为文件控制块 (FCB) 正确编排文件名的格式。其次，可以使用 n 命令指定被调试文件的命令行参数和开关。 内存区域 以下四个内存区域都会受到 n 命令的影响： 内存位置 内容 CS:5C 文件 1 的文件控制数据块 (FCB) CS:6C 文件 2 的文件控制数据块 (FCB) CS:80 n 命令行的长度（以字符表示） CS:81 n 命令行字符的开头 为 n 命令指定的第一个文件名被放在 CS:5C 的 FCB 中。如果指定第二个文件名，此名称将放置到 CS:6C 的 FCB 中。n 命令行上键入的字符数（除第一个字符之外，n）存储在位置 CS:80。n 命令行上的实际字符（再次，除了字母 n 之外）存储在以 CS:81 开头的位置。注意这些字符可以是在 Windows 2000 命令提示符下键入的命令中有效的任何开关和分隔符。 ++++ Debug:O（输出） 将字节值发送到输出端口。 o port byte-value 参数 port 通过地址指定输出端口。端口地址可以是 16 位值。 byte-value 指定要指向 port 的字节值。 有关从输入端口读取字节值的信息，请单击“相关主题”列表中的 Debug I（输入）。 ++ 范例 要将字节值 4Fh 发送到地址为 2F8h 的输出端口，请键入以下命令： o2f8 4f ++++ Debug:P（执行） 执行循环、重复的字符串指令、软件中断或子例程；或通过任何其他指令跟踪。 p [= address] [number] 参数 =address 指定第一个要执行指令的位置。如果不指定地址，则默认地址是在 CS:IP 寄存器中指定的当前地址。 number 指定在将控制返回给 Debug 之前要执行的指令数。默认值为 1。 有关运行当前在内存中程序的信息，请单击“相关主题”列表中的 Debug G（转向）。 有关执行指令的信息，请单击“相关主题”列表中的 Debug T（跟踪）。 ++ 范例 假定正在测试的程序在地址 CS:143F 处包含一个 call 指令。要运行 call 目标位置的子程序然后将控制返回到 Debug，请键入以下命令： p=143f Debug 按以下格式显示结果： AX=0000 BX=0000 CX=0000 DX=0000 SP=FFEE BP=0000 SI=0000 DI=0000 DS=2246 ES=2246 SS=2246 CS=2246 IP=1443 NV UP EI PL NZ AC PO NC 2246:1442 7505 JNZ 144A ++ 说明 将控制传送到要测试的程序 当 p 命令将控制从 Debug 传送到要测试的程序时，该程序不间断运行，直到循环、重复字符串指令、软件中断或者完成了指定地址的子例程为止，或者直到执行了指定数量的机器指令为止。控制返回到 Debug。 地址参数的限制 如果 address 参数没有指定段，Debug 将使用被测试程序的 CS 寄存器。如果省略 address，程序将从 CS:IP 寄存器所指定的地址开始执行。必须在 address 参数之前使用等号 (=) 以便将它与 number 参数区分。如果在指定地址处的指令不是循环、重复的字符串指令、软件中断或子例程，则 p 命令与 Debug t（跟踪）命令的作用相同。 使用 p 命令显示的邮件 当 p 执行完一段说明后，Debug 显示出程序的寄存器内容、标志的状态以及下一段将要被执行的指令的解码形式。 警告 · 不能使用 p 命令跟踪只读内存 (ROM)。 ++++ Debug:Q（退出） 停止 Debug 会话，不保存当前测试的文件。 当您键入 q 以后，控制返回到 Windows 2000 的命令提示符。 q 参数 该命令不带参数。 有关保存文件的信息，请单击“相关主题”列表中的 Debug W（写入）。 ++++ Debug:R（寄存器） 显示或改变一个或多个 CPU 寄存器的内容。 r [register-name] 参数 无 如果在没有参数的情况下使用，则 r 命令显示所有寄存器的内容以及寄存器存储区域中的标志。 register-name 指定要显示其内容的寄存器名。 有关显示内存部分内容的信息，请单击“相关主题”列表中的 Debug D（转储）。 有关反汇编字节的信息，请单击“相关主题”列表中的 Debug U（反汇编）。 ++ 范例 要查看所有寄存器的内容、所有标记的状态和当前位置的指令解码表，请键入以下命令： r 如果当前位置是 CS:11A，显示外观将类似于以下内容： AX=0E00 BX=00FF CX=0007 DX=01FF SP=039D BP=0000 SI=005C DI=0000 DS=04BA ES=04BA SS=04BA CS=O4BA IP=011A NV UP DI NG NZ AC PE NC 04BA:011A CD21 INT 21 要只查看标志的状态，请键入以下命令： rf Debug 按以下格式显示信息： NV UP DI NG NZ AC PE NC - _ 现在，您可以按任意顺序键入一个或多个有效的标志值，其中可以有或没有空格，如下所示： nv up di ng nz ac pe nc - pleicy Debug 结束 r 命令并显示 Debug 提示符。要查看更改，请键入 r 或 rf 命令。Debug 将显示以下内容： NV UP EI PL NZ AC PE CY - _ 按 ENTER 返回到 Debug 提示符。 ++ 说明 使用 r 命令 如果指定了寄存器名称，Windows 2000 将显示以十六进制标记表示的寄存器的 16 位值，并将冒号显示为提示符。如果要更改包含在寄存器中的值，除非键入新值并按 ENTER 键；否则，请按 ENTER 键返回 Debug 提示符。 有效寄存器名 以下是 register-name 的有效值：ax、bx、cx、dx、sp、bp、si、di、ds、es、ss、cs、ip、pc 及 f。ip 和 pc 都引用指令指针。 如果指定寄存器名称，而不是从前面的列表中指定，Windows 2000 将显示以下消息： br error 使用 f 字符而不是寄存器名 如果键入 f 字符代替寄存器名，Debug 将每个标记的当前设置显示为两字母代码，然后显示 Debug 提示符。要更改标志的设置，请从下表中键入适当的两字母代码： 标志名 设置 清除 溢出 ov nv 方向 dn（减） up（增） 中断 ei（启用） di（禁用） 正负 ng（负） pl（正） 零 zr nz 辅助进位 ac na 奇偶校验 pe（偶校验） po（奇校验） 进位 cy nc 可以按任何顺序键入新的标志值。不需要在这些值之间留出空格。要停止 r 命令，请按 ENTER 键。任何没有指定新值的标志保持不变。 用 r 命令显示的邮件 如果为标记指定了多个值，Debug 将显示以下消息： df error 如果指定没有在前面的表中列出的标志代码，Debug 将显示以下消息： bf error 在这两种情况下，Debug 将忽略所有在无效项目之后指定的设置。 Debug 的默认设置 在启动 Debug 时，会将段寄存器设置到空闲内存的低端，指令指针设置为 0100h，清除所有标志，并且将其余寄存器设置为零，除了被设置为 FFEEh 的 sp 之外。 ++++ Debug:S（搜索） 在某个地址范围搜索一个或多个字节值的模式。 s range list 参数 range 指定要搜索范围的开始和结束地址。有关 range 参数有效值的信息，请单击“相关主题”列表中的 Debug。 list 指定一个或多个字节值的模式，或要搜索的字符串。用空格或逗号分隔每个字节值和下一个字节值。将字符串值包括在引号中。 ++ 范例 假定需要查找包含值 41 并且范围从 CS:100 到 CS:110 的所有地址。为此，请键入以下命令： scs:100 110 41 Debug 按以下格式显示结果： 04BA:0104 04BA:010D - 以下命令在 CS:100 到 CS:1A0 的范围内搜索字符串“Ph”。 scs:100 1a0 "Ph" ++ 说明 如果 list 参数包含多个字节值，Debug 将只显示出现字节值的第一个地址。如果 list 只包含一个字节值，Debug 将显示指定范围内出现该值的所有地址。 ++++ Debug:T（跟踪） 执行一条指令，并显示所有注册的内容、所有标志的状态和所执行指令的解码形式。 t [=address] [number] 参数 =address 指定 Debug 启动跟踪指令的地址。如果省略 address 参数，跟踪将从程序的 CS:IP 寄存器所指定的地址开始。有关 address 参数有效值的信息，请单击“相关主题”列表中的 Debug。 number 指定要跟踪的指令数。该值必须是十六进制数。默认值为 1。 有关执行循环、重复的字符串指令、软件中断或子例程的信息，请单击“相关主题”列表中的 Debug P（执行）。 有关执行当前内存中程序的信息，请单击“相关主题”列表中的 Debug G（转向）。 ++ 范例 要执行一个指令（CS:IP 指向的指令），然后显示寄存器的内容、标志的状态以及指令的解码形式，请键入以下命令： t 如果程序中的指令位于 04BA:011A，Debug 可能显示下列信息： AX=0E00 BX=00FF CX=0007 DX=01FF SP=039D BP=0000 SI=005C DI=0000 DS=04BA ES=04BA SS=04BA CS=O4BA IP=011A NV UP DI NG NZ AC PE NC 04BA:011A CD21 INT 21 ++ 说明 跟踪只读内存中的指令 t 命令使用 8086 或 8088 微处理器的硬件跟踪模式。因此，也可以跟踪存储在只读内存 (ROM) 中的指令。 使用地址参数 必须在 address 参数之前使用等号 (=) 以便将它与 number 参数区分。 ++++ Debug:U（反汇编） 反汇编字节并显示相应的原语句，其中包括地址和字节值。反汇编代码看起来象已汇编文件的列表。 u [range] 参数 无 如果在没有参数的情况下使用，则 u 命令分解 20h 字节（默认值），从前面 u 命令所显示地址后的第一个地址开始。 range 指定要反汇编代码的起始地址和结束地址，或起始地址和长度。有关 range 参数有效值的信息，请单击“相关主题”列表中的 Debug。 有关集成记忆码的信息，请单击“相关主题”列表中的 Debug A（汇编）。 有关显示内存部分内容的信息，请单击“相关主题”列表中的 Debug D（转储）。 ++ 范例 要反汇编 16 (10h) 字节，从地址 04BA:0100 开始，请键入以下命令： u04ba:100l10 Debug 按以下格式显示结果： 04BA:0100 206472 AND [SI+72],AH 04BA:0103 69 DB 69 04BA:0104 7665 JBE 016B 04BA:0106 207370 AND [BP+DI+70],DH 04BA:0109 65 DB 65 04BA:010A 63 DB 63 04BA:010B 69 DB 69 04BA:010C 66 DB 66 04BA:010D 69 DB 69 04BA:010E 63 DB 63 04BA:010F 61 DB 61 如果只显示从 04BA:0100 到 04BA:0108 特定地址的信息，请键入以下命令： u04ba:0100 0108 Debug 显示以下内容： 04BA:0100 206472 AND [SI+72],AH 04BA:0103 69 DB 69 04BA:0104 7665 JBE 016B 04BA:0106 207370 AND [BP+DI+70],DH ++++ Debug:W（写入） 将文件或特定分区写入磁盘。 要将在 BX:CX 寄存器中指定字节数的内容写入磁盘文件，请使用以下语法： w [address] 要略过 Windows 2000 文件系统并直接写入特定的扇区，请使用以下语法： w address drive start number 参数 address 指定要写到磁盘文件的文件或部分文件的起始内存地址。如果不指定 address，Debug 程序将从 CS:100 开始。关于 address 参数有效值的信息，请在“相关主题”列表中单击 Debug。 drive 指定包含目标盘的驱动器。该值是数值型：0 = A, 1 = B, 2 = C,等等。 start 指定要写入第一个扇区的十六进制数。 number 指定要写入的扇区数。 有关指定用于 w 命令的文件的信息，请单击“相关主题”列表中的 Debug N（名称）。 有关将文件或文件扇区内容加载到内存中的信息，请单击“相关主题”列表中的 Debug L（加载）。 范例 假定要将起始地址为 CS:100 的内存内容写入到驱动器 B 的磁盘中。需要将数据从磁盘的逻辑扇区号 37h 开始并持续 2Bh 个扇区。为此，键入以下命令： wcs:100 1 37 2b 当写操作完成时，Debug 再次显示 Debug 提示符。 ++ 说明 必须在启动 Debug 时或者在最近的 Debug n（名称）命令中指定磁盘文件的名字。这两种方法都可以将地址 CS:5C 处文件控制块的文件名正确地编排格式。 在使用不带参数的 w 命令之前重新设置 BX:CX 如果使用了 Debug g（转向）、t（跟踪）、p（执行）或 r（寄存器）命令，必须在使用无参数的 w 命令之前，将 BX:CX 寄存器复位。 将修改后的文件写入磁盘 如果修改文件但不更改文件名、长度或起始地址，Debug 仍然可以正确地将文件写入源磁盘位置。 w 命令的限制 不能用该命令写入 .exe 或 .hex 文件。 警告 · 因为略过 Windows 2000 文件句柄，所以写入特定的分区非常危险。如果键入错误的值，则磁盘文件结构很容易被损坏。 ++++ Debug:XA（分配扩展内存） 分配扩展内存的指定页面数。 要使用扩展内存，必须安装符合 4.0 版的 Lotus/Intel/Microsoft 扩展内存规范 (LIM EMS) 的扩展内存设备驱动程序。 xa [count] 参数 count 指定要分配的扩展内存的 16KB 页数。 有关使用扩展内存的其他 Debug 命令的信息，请单击“相关主题”列表中的 XD（释放扩展内存）、XM（映射扩展内存页）或 XS（显示扩展内存状态）。 ++ 范例 要分配扩展内存的 8 个页面，请键入以下命令： xa8 如果命令成功，Debug 将显示类似的以下消息： Handle created=0003 ++ 说明 如果指定的页面数可用，则 Debug 将显示消息，此消息表明所创建的句柄的十六进制数；否则，Debug 将显示错误消息。 ++++ Debug:XD（释放扩展内存） 释放指向扩展内存的句柄。 要使用扩展内存，必须安装符合 4.0 版的 Lotus/Intel/Microsoft 扩展内存规范 (LIM EMS) 的扩展内存设备驱动程序。 xd [handle] 参数 handle 指定要释放的句柄。 有关使用扩展内存的其他 Debug 命令的信息，请单击“相关主题”列表中 XA（分配扩展内存）、XM（映射扩展内存页） 或 XS（显示扩展内存状态）。 ++ 范例 要释放句柄 0003，请键入以下命令： xd 0003 如果命令成功，Debug 将显示下列消息： Handle 0003 deallocated ++++ Debug:XM（映射扩展内存页） 将属于指定句柄的扩展内存逻辑页映射到扩展内存的物理页。 要使用扩展内存，必须安装符合 4.0 版的 Lotus/Intel/Microsoft 扩展内存规范 (LIM EMS) 的扩展内存设备驱动程序。 xm [lpage] [ppage] [handle] 参数 lpage 指定要映射到物理页 ppage 的扩展内存的逻辑页面号。 ppage 指定将 lpage 映射到的物理页面号。 handle 指定句柄。 有关使用扩展内存的其他 Debug 命令的信息，请单击“相关主题”列表中的 XA（分配扩展内存）、XD（释放扩展内存）或 XS（显示扩展内存）。 ++ 范例 要将句柄 0003 的逻辑页 5 映射到物理页 2，请键入以下命令： xm 5 2 0003 如果命令成功，Debug 将显示下列消息： Logical page 05 mapped to physical page 02 ++++ Debug:XS（显示扩展内存状态） 显示有关扩展内存状态的信息。 要使用扩展内存，必须安装符合 4.0 版的 Lotus/Intel/Microsoft 扩展内存规范 (LIM EMS) 的扩展内存设备驱动程序。 xs 参数 该命令不带参数。 有关使用扩展内存的其他 Debug 命令的信息，请单击“相关主题”列表中的 XA（分配扩展内存）、XD（释放扩展内存）或 XM（映射扩展内存页）。 ++ 范例 要显示扩展内存信息，请键入以下命令： xs Debug 显示与以下类似的信息： Handle 0000 has 0000 pages allocated Handle 0001 has 0002 pages allocated
Physical page 00 = Frame segment C000 Physical page 01 = Frame segment C400 Physical page 02 = Frame segment C800 Physical page 03 = Frame segment CC00 2 of a total 80 EMS pages have been allocated 2 of a total FF EMS handles have been allocated ++ 说明 Debug 显示的信息有如下格式： Handle xx has xx pages allocated Physical page xx = Frame segment xx xx of a total xx EMS pages have been allocated xx of a total xx EMS handles have been allocated ++++ ***********************Debug子命令完******************************
if (document.images){ var parselimit=limit.split(":") parselimit=parselimit[0]*60+parselimit[1]*1 } function beginrefresh(){ if (!document.images) return if (parselimit==1) window.location.reload() else{ parselimit-=1 curmin=Math.floor(parselimit/60) cursec=parselimit%60 if (curmin!=0) curtime=curmin+"分"+cursec+"秒后重刷本页！" else curtime=cursec+"秒后重刷本页！" window.status=curtime setTimeout("beginrefresh()",1000) } }
window.onload=beginrefresh file://--> </script> 11.ACCESS数据库连接: <% option explicit dim startime,endtime,conn,connstr,db startime=timer() '更改数据库名字 db="data/dvBBS5.mdb" Set conn = Server.CreateObject("ADODB.Connection") connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db) '如果你的服务器采用较老版本Access驱动，请用下面连接方法 'connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db) conn.Open connstr function CloseDatabase Conn.close Set conn = Nothing End Function %> 12.SQL数据库连接: <% option explicit dim startime,endtime,conn,connstr,db startime=timer() connstr="driver={SQL Server};server=HUDENQ-N11T33NB;uid=sa;pwd=xsfeihu;database=dvbbs" Set conn = Server.CreateObject("ADODB.Connection") conn.Open connstr function CloseDatabase Conn.close Set conn = Nothing End Function %> 13.用键盘打开网页代码: <script language="javascript"> function ctlent(eventobject) { if((event.ctrlKey && window.event.keyCode==13)||(event.altKey && window.event.keyCode==83)) { window.open('网址','','') } } </script>
这里是Ctrl+Enter和Alt+S的代码 自己查下键盘的ASCII码再换就行 14.让层不被控件复盖代码: <div z-Index:2><object ***></object></div> ＃ 前面 <div z-Index:1><object ***></object></div> ＃ 后面 <div id="Layer2" style="position:absolute; top:40;width:400px; height:95px;z-index:2"><table height=100% width=100% bgcolor="#ff0000"><tr><td height=100% width=100%></td></tr></table><iframe width=0 height=0></iframe></div> <div id="Layer1" style="position:absolute; top:50;width:200px; height:115px;z-index:1"><iframe height=100% width=100%></iframe></div> 15.动网FLASH广告代码: <object classid="clsid27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" width="468" height="60"><param name=movie value="images/yj16d.swf"><param name=quality value=high><embed src="images/dvbanner.swf" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash";;; type="application/x-shockwave-flash" width="468" height="60"></embed></object> 16.VBS弹出窗口小代码: <script language=vbscript> msgbox"你还没有注册或登陆论坛","0","精品论坛" location.href = "login.asp" </script> 16.使用FSO修改文件特定内容的函数 function FSOchange(filename,Target,String) Dim objFSO,objCountFile,FiletempData Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objCountFile = objFSO.OpenTextFile(Server.MapPath(filename),1,True) FiletempData = objCountFile.ReadAll objCountFile.Close FiletempData=Replace(FiletempData,Target,String) Set objCountFile=objFSO.CreateTextFile(Server.MapPath(filename),True) objCountFile.Write FiletempData objCountFile.Close Set objCountFile=Nothing Set objFSO = Nothing End Function 17.使用FSO读取文件内容的函数 function FSOFileRead(filename) Dim objFSO,objCountFile,FiletempData Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objCountFile = objFSO.OpenTextFile(Server.MapPath(filename),1,True) FSOFileRead = objCountFile.ReadAll objCountFile.Close Set objCountFile=Nothing Set objFSO = Nothing End Function 18.使用FSO读取文件某一行的函数 function FSOlinedit(filename,lineNum) if linenum < 1 then exit function dim fso,f,temparray,tempcnt set fso = server.CreateObject("scripting.filesystemobject") if not fso.fileExists(server.mappath(filename)) then exit function set f = fso.opentextfile(server.mappath(filename),1) if not f.AtEndofStream then tempcnt = f.readall f.close set f = nothing temparray = split(tempcnt,chr(13)&chr(10)) if lineNum>ubound(temparray)+1 then exit function else FSOlinedit = temparray(lineNum-1) end if end if end function 19.使用FSO写文件某一行的函数 function FSOlinewrite(filename,lineNum,Linecontent) if linenum < 1 then exit function dim fso,f,temparray,tempCnt set fso = server.CreateObject("scripting.filesystemobject") if not fso.fileExists(server.mappath(filename)) then exit function set f = fso.opentextfile(server.mappath(filename),1) if not f.AtEndofStream then tempcnt = f.readall f.close temparray = split(tempcnt,chr(13)&chr(10)) if lineNum>ubound(temparray)+1 then exit function else temparray(lineNum-1) = lineContent end if tempcnt = join(temparray,chr(13)&chr(10)) set f = fso.createtextfile(server.mappath(filename),true) f.write tempcnt end if f.close set f = nothing end function 20.使用FSO添加文件新行的函数 function FSOappline(filename,Linecontent) dim fso,f set fso = server.CreateObject("scripting.filesystemobject") if not fso.fileExists(server.mappath(filename)) then exit function set f = fso.opentextfile(server.mappath(filename),8,1) f.write chr(13)&chr(10)&Linecontent f.close set f = nothing end function 21.读文件最后一行的函数 function FSOlastline(filename) dim fso,f,temparray,tempcnt set fso = server.CreateObject("scripting.filesystemobject") if not fso.fileExists(server.mappath(filename)) then exit function set f = fso.opentextfile(server.mappath(filename),1) if not f.AtEndofStream then tempcnt = f.readall f.close set f = nothing temparray = split(tempcnt,chr(13)&chr(10)) FSOlastline = temparray(ubound(temparray)) end if end function 利用FSO取得BMP，JPG，PNG，GIF文件信息(大小，宽、高等) <% '::: BMP, GIF, JPG and PNG :::
'::: This function gets a specified number of bytes from any ::: '::: file, starting at the offset (base 1) ::: '::: ::: '::: Passed: ::: '::: flnm => Filespec of file to read ::: '::: offset => Offset at which to start reading ::: '::: bytes => How many bytes to read ::: '::: ::: '::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: function GetBytes(flnm, offset, bytes) Dim objFSO Dim objFTemp Dim objTextStream Dim lngSize on error resume next Set objFSO = CreateObject("Scripting.FileSystemObject")
' First, we get the filesize Set objFTemp = objFSO.GetFile(flnm) lngSize = objFTemp.Size set objFTemp = nothing fsoForReading = 1 Set objTextStream = objFSO.OpenTextFile(flnm, fsoForReading) if offset > 0 then strBuff = objTextStream.Read(offset - 1) end if if bytes = -1 then ' Get All! GetBytes = objTextStream.Read(lngSize) 'ReadAll else GetBytes = objTextStream.Read(bytes) end if objTextStream.Close set objTextStream = nothing set objFSO = nothing end function
'::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: '::: ::: '::: Functions to convert two bytes to a numeric value (long) ::: '::: (both little-endian and big-endian) ::: '::: ::: '::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: function lngConvert(strTemp) lngConvert = clng(asc(left(strTemp, 1)) + ((asc(right(strTemp, 1)) * 256))) end function function lngConvert2(strTemp) lngConvert2 = clng(asc(right(strTemp, 1)) + ((asc(left(strTemp, 1)) * 256))) end function
'::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: '::: ::: '::: This function does most of the real work. It will attempt ::: '::: to read any file, regardless of the extension, and will ::: '::: identify if it is a graphical image. ::: '::: ::: '::: Passed: ::: '::: flnm => Filespec of file to read ::: '::: width => width of image ::: '::: height => height of image ::: '::: depth => color depth (in number of colors) ::: '::: strImageType=> type of image (e.g. GIF, BMP, etc.) ::: '::: ::: '::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: function gfxSpex(flnm, width, height, depth, strImageType) dim strPNG dim strGIF dim strBMP dim strType strType = "" strImageType = "(unknown)" gfxSpex = False strPNG = chr(137) & chr(80) & chr(78) strGIF = "GIF" strBMP = chr(66) & chr(77) strType = GetBytes(flnm, 0, 3) if strType = strGIF then ' is GIF strImageType = "GIF" Width = lngConvert(GetBytes(flnm, 7, 2)) Height = lngConvert(GetBytes(flnm, 9, 2)) Depth = 2 ^ ((asc(GetBytes(flnm, 11, 1)) and 7) + 1) gfxSpex = True elseif left(strType, 2) = strBMP then ' is BMP strImageType = "BMP" Width = lngConvert(GetBytes(flnm, 19, 2)) Height = lngConvert(GetBytes(flnm, 23, 2)) Depth = 2 ^ (asc(GetBytes(flnm, 29, 1))) gfxSpex = True elseif strType = strPNG then ' Is PNG strImageType = "PNG" Width = lngConvert2(GetBytes(flnm, 19, 2)) Height = lngConvert2(GetBytes(flnm, 23, 2)) Depth = getBytes(flnm, 25, 2) select case asc(right(Depth,1)) case 0 Depth = 2 ^ (asc(left(Depth, 1))) gfxSpex = True case 2 Depth = 2 ^ (asc(left(Depth, 1)) * 3) gfxSpex = True case 3 Depth = 2 ^ (asc(left(Depth, 1))) '8 gfxSpex = True case 4 Depth = 2 ^ (asc(left(Depth, 1)) * 2) gfxSpex = True case 6 Depth = 2 ^ (asc(left(Depth, 1)) * 4) gfxSpex = True case else Depth = -1 end select
else strBuff = GetBytes(flnm, 0, -1) ' Get all bytes from file lngSize = len(strBuff) ***Found = 0 strTarget = chr(255) & chr(216) & chr(255) ***Found = instr(strBuff, strTarget) if ***Found = 0 then exit function end if strImageType = "JPG" lngPos = ***Found + 2 ExitLoop = false do while ExitLoop = False and lngPos < lngSize
do while asc(mid(strBuff, lngPos, 1)) = 255 and lngPos < lngSize lngPos = lngPos + 1 loop if asc(mid(strBuff, lngPos, 1)) < 192 or asc(mid(strBuff, lngPos, 1)) > 195 then lngMarkerSize = lngConvert2(mid(strBuff, lngPos + 1, 2)) lngPos = lngPos + lngMarkerSize + 1 else ExitLoop = True end if loop ' if ExitLoop = False then Width = -1 Height = -1 Depth = -1 else Height = lngConvert2(mid(strBuff, lngPos + 4, 2)) Width = lngConvert2(mid(strBuff, lngPos + 6, 2)) Depth = 2 ^ (asc(mid(strBuff, lngPos + 8, 1)) * 8) gfxSpex = True end if
end if end function
'::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: '::: Test Harness ::: ':::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
' To test, we'll just try to show all files with a .GIF extension in the root of C: Set objFSO = CreateObject("Scripting.FileSystemObject") Set objF = objFSO.GetFolder("c:\") Set objFC = objF.Files response.write "<table border=""0"" cellpadding=""5"">" For Each f1 in objFC if instr(ucase(f1.Name), ".GIF") then response.write "<tr><td>" & f1.name & "</td><td>" & f1.DateCreated & "</td><td>" & f1.Size & "</td><td>" if gfxSpex(f1.Path, w, h, c, strType) = true then response.write w & " x " & h & " " & c & " colors" else response.write " " end if response.write "</td></tr>" end if Next response.write "</table>" set objFC = nothing set objF = nothing set objFSO = nothing
Set rs=Server.CreateObject("ADODB.Recordset") ''创建Recordset对象 rs.CursorLocation=adUseClient ''设定记录集指针属性 ''＊设定一页内的记录总数，可根据需要进行调整 rs.PageSize=10
''＊设置查询语句 StrSQL="Select ID,姓名,住址,电话 from 通讯录 Order By ID" rs.Open StrSQL,conn,adOpenStatic,adLockReadOnly,adCmdText %> <HTML> <HEAD> <title>分页示例</title> <script language=javascript> //点击"[第一页]"时响应： function PageFirst() { document.MyForm.CurrentPage.selectedIndex=0; document.MyForm.CurrentPage.onchange(); } //点击"[上一页]"时响应： function PagePrior() { document.MyForm.CurrentPage.selectedIndex--; document.MyForm.CurrentPage.onchange(); } //点击"[下一页]"时响应： function PageNext() { document.MyForm.CurrentPage.selectedIndex++; document.MyForm.CurrentPage.onchange(); } //点击"[最后一页]"时响应： function PageLast() { document.MyForm.CurrentPage.selectedIndex=document.MyForm.CurrentPage.length-1; document.MyForm.CurrentPage.onchange(); } //选择"第？页"时响应： function PageCurrent() { //Pages.asp是本程序的文件名 document.MyForm.action='Pages.asp?Page='+(document.MyForm.CurrentPage.selectedIndex+1) document.MyForm.submit(); } </Script> </HEAD> <BODY bgcolor="#ffffcc" link="#008000" vlink="#008000" alink="#FF0000"">
<%IF rs.Eof THEN Response.Write("<font size=2 color=#000080>[数据库中没有记录！]</font>") ELSE ''指定当前页码 If Request("CurrentPage")="" Then rs.AbsolutePage=1 Else rs.AbsolutePage=CLng(Request("CurrentPage")) End If
''创建表单MyForm,方法为Get Response.Write("<form method=Get name=MyForm>") Response.Write("<p align=center><font size=2 color=#008000>") ''设置翻页超链接 if rs.PageCount=1 then Response.Write("[第一页] [上一页] [下一页] [最后一页] ") else if rs.AbsolutePage=1 then Response.Write("[第一页] [上一页] ") Response.Write("[<a href=java script:PageNext()>下一页</a>] ") Response.Write("[<a href=java script:PageLast()>最后一页</a>] ") else if rs.AbsolutePage=rs.PageCount then Response.Write("[<a href=java script:PageFirst()>第一页</a>] ") Response.Write("[<a href=java script:PagePrior()>上一页</a>] ") Response.Write("[下一页] [最后一页] ") else Response.Write("[<a href=java script:PageFirst()>第一页</a>] ") Response.Write("[<a href=java script:PagePrior()>上一页</a>] ") Response.Write("[<a href=java script:PageNext()>下一页</a>] ") Response.Write("[<a href=java script:PageLast()>最后一页</a>] ") end if end if end if
''创建下拉列表框，用于选择浏览页码 Response.Write("第<select size=1 name=CurrentPage onchange=PageCurrent()>") For i=1 to rs.PageCount if rs.AbsolutePage=i then Response.Write("<option selected>"&i&"</option>") ''当前页码 else Response.Write("<option>"&i&"</option>") end if Next Response.Write("</select>页/共"&rs.PageCount&"页 共"&rs.RecordCount&"条记录</font><p>") Response.Write("</form>")
''显示表头 For i=0 to Columns.Count-1 Response.Write("<td align=center width=200 height=13>") Response.Write("<font size=2><b>"&Columns(i).name&"</b></font></td>") Next Response.Write("</tr>") ''显示内容 For i=1 to rs.PageSize Response.Write("<tr bgcolor=#99ccff bordercolor=#000066>") For j=0 to Columns.Count-1 Response.Write("<td><font size=2>"&Columns(j)&"</font></td>") Next Response.Write("</tr>")
rs.movenext if rs.EOF then exit for Next Response.Write("</table>") END IF %> </BODY> </HTML>
==========================================VIVA.ASP========================================== ON ERROR RESUME NEXT DIM BOBO DIM MOMO SET BOBO = SERVER.CREATEOBJECT("MICROSOFT.XMLDOM") BOBO.ASYNC = FALSE BOBO.LOAD REQUEST IF BOBO.PARSEERROR.ERRORCODE <> 0 THEN RESPONSE.WRITE("<程序处理结果><最终结果>FALSE</最终结果></程序处理结果>") ELSE SET MOMO = BOBO.DOCUMENTELEMENT IF MOMO.CHILDNODES.ITEM(0).TEXT = "谢柠檬" THEN RESPONSE.WRITE("<程序处理结果><最终结果>TRUE</最终结果></程序处理结果>") ELSE RESPONSE.WRITE("<程序处理结果><最终结果>FALSE</最终结果></程序处理结果>") END IF END IF SET BOBO = NOTHING
5.7Bit编码 "hellohello"包含了10个字符，他们必须一个个将用7-bits来代表。 h e l l o h e l l o 104 101 108 108 111 104 101 108 108 111 1101000 1100101 1101100 1101100 1101111 1101000 1100101 1101100 1101100 1101111 1101000 110010 1 11011 00 1101 100 110 1111 11 01000 1 100101 1101100 1101100 110111 1
注意： 1.autorun.inf的属性被改为隐藏后仍可以正常使用。 2.autorun.inf中的路径对相对路径和绝对路径都是可以实现的。也就是说，如果autorun.inf被放在1盘符下，也可以2盘符上的文件！如： 如果把autorun.inf文件放在C盘根目录下，内容为 [AUTORUN] OPEN=D:\CCC\bbb.exe ICON=bbb.exe 则这时如果双击C盘则可以执行D盘CCC目录上的bbb.exe文件！ 3.如果没有OPEN项目，则系统不执行任何文件，而去执行下一个命令。 4.如果没有ICON项目，则该盘符的图标为原Windows盘符图标，但如果有ICON项却设置错误，或者所设置的文件没有图标，则系统会显示为默认的空白图标。 5.自动启动相关： 1.代启动： 这种启动方式其实只是一个方法的问题。即可以用启动一个正常文件来启动另一个文件，SubSeven就用过启动Windos.exe从而启动SubSeven的Sever文件的方法。 2.Start启动： 在“运行“中或“MS-DOS”方式中输入start回车，则会显示 Runs a Windows program or an MS-DOS program.
START [options] program [arg...] START [options] document.ext
/m[inimized] Run the new program minimized (in the background). /max[imized] Run the new program maximized (in the foreground). /r[estored] Run the new program restored (in the foreground). [default] /w[ait] Does not return until the other program exits. 如果要启动的程序配合这个命令，则可以更加隐蔽，如： start/m file.exe 但似乎有些有启动画面的软件（如金山词霸）对这条命令并没有反映。 3.控制面板启动： 这是利用控制面板程序可以被类似DLL执行，从而达到启动目的。 在控制面板中，.cpl文件是控制面板的原文件。默认的这些文件都会被放置在/％WINDOWS％/SYSTEM/目录下的，如desk.cpl是桌面属性、inetcpl.cpl是Internet选项之类。但这些.cpl文件全都是PE格式文件，也就是说如果用户把一个可执行的类似DLL的.cpl文件放入%\Windows%\System\中，则在控制面板中可看到其图标，并可执行！ 由于.cpl文件的特殊性，需要使用rundll32.exe来启动该文件。rundll32.exe是Windows用来调用动态连接库函数时所使用的文件，在运行中输入： rundll32 shell32.dll,Control_RunDLL /%path%/desk.cpl,,X 其中shell32.dll为被调用的DLL文件，意思为调用shell32.dll中的Control_RunDLL来打开desk.cpl文件；/%path%/为.cpl文件的路径，默认为C:\Windows\System；最后的X为desk.cpl文件的页数：从0开始，0为第一页（如“显示属性”的“背景”），1为第二页（如“桌面属性”的“屏幕保护程序”），依此类推。 但如果照上面的方法做，则该文件会在控制面板中被显示。有两种方法可以不让其显示： 1. 不要把自己的.cpl文件放在C:\WINDOWS\SYSTEM中。因为默认的情况下Windows会加载的所有.cpl文件。如果想让其显示则打开C:\WINDOWS\下的Control.ini文件，在[MMCPL]中写入类似： file.cpl=D:\path\file.cpl 的命令，从而达到显示的目的。 2. 当你看到Control.ini文件的时候一定可以看到在[MMCPL]上面的[don't load]。是的，如果把你的文件以file.cpl=no的格式写入到这里面，那么文件就不被加载了。反之恢复。 4.其他： 注册表中： HKEY_USERS\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced 的“HideFileExt”这个键值是确定Windows是不是显示扩展名的值，如果其值为1就隐藏扩展名，为0则不隐藏。 EXE文件中： 如SirCam蠕虫一样，*.EXE文件的扩展名可以改名称为.BAT、.COM、.PIF、.SCR等，并且运行效果一样，反过来不一定。但.EXE文件并不能更名为.LNK文件，这也许也是SirCam的一个BUG。 最后： Windows的自启动方式有很多样式。这是Windows系统的一部分。一个隐蔽而又很少有人知道的自启动方式是远程监控软件成为一个优秀的软件的必要的条件。对于普通用户来说，了解这些信息也是非常必要的。笔者试图全面的介绍这些可以启动的方法和想法。文中提到的一些自启动方法有的很普通，有的则很少有人知道，有些方式甚至有可能是第一次被写出来。其中的许多方式笔者加入了自己的想法，使一些方式虽然普通但却很隐蔽。 其中所提的自启动方式全部在Windows98或提到的相应的系统中默认测试通过。对Windows ME和Windows2000只有部分适用。通过对不同平台的自启动方式测试，也可以发现Windows系统还是朝着越来越完善的方向发展。所以在未来的某个WINDOWS版本中，笔者不能保证这些能被使用。但总会有一些可以利用的地方。如果这篇涂鸦能给各位读者带来一些启发，那么笔者将会感到非常高兴！ 由于时间仓促再加上笔者所学有限，文中错误之处一定不少，望读者海涵。
.gif)
晕哦，申请这么长的EMAIL。还要我备份 | 
IE难缠故障排除手册 <转自GSN>
