2006年10月13日 20:22
选择"显示所有文件"
建立新用户
注销后用Esc进入，编辑注册表
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\explorer\Advanced\Folder\NOHIDDEN
删除键值 TYRE=RADIO
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\explorer\Advanced\Folder\SHOWALL
删除键值 TYRE=RADIO
之后可以发现"显示所有文件"和"不显示隐藏文件"选项消失了
在非用户界面中选折"不显示隐藏文件和系统文件"
以后就只有在用户界面才看得到隐藏文件了
但是千万不要在用户界面中选择"不显示隐藏文件和系统文件",否则就要重新恢复注册表了
建立新用户
注销后用Esc进入，编辑注册表
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\explorer\Advanced\Folder\NOHIDDEN
删除键值 TYRE=RADIO
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\explorer\Advanced\Folder\SHOWALL
删除键值 TYRE=RADIO
之后可以发现"显示所有文件"和"不显示隐藏文件"选项消失了
在非用户界面中选折"不显示隐藏文件和系统文件"
以后就只有在用户界面才看得到隐藏文件了
但是千万不要在用户界面中选择"不显示隐藏文件和系统文件",否则就要重新恢复注册表了
2006年10月7日 20:11
在制作Chat Union系统时，有一个功能暂时不打算使用Flash实现，但这个功能又必须出现在Flash中。因此考虑使用一个
，让其漂浮在Flash动画上方，提供这个暂时不用Flash实现的功能。
但是默认情况下，Flash影片是处于最上层的，无法将
但是默认情况下，Flash影片是处于最上层的，无法将
置于其上。查阅Flash的帮助文件，发现这样一段描述：
因此，在HTML中将
引用
wmode 属性/参数
值
Window | Opaque | Transparent
模板变量：$WM
说明
（可选）使您可以使用 Internet Explorer 4.0 中的透明 Flash 内容、绝对定位和分层显示的功能。此标记/属性仅在带有 Flash Player ActiveX 控件的 Windows 中有效。
“Window”在 Web 页上用影片自己的矩形窗口来播放应用程序。“Window”表明 Flash 应用程序与 HTML 层没有任何交互，并且始终位于最顶层。
“Opaque” 使应用程序隐藏页面上位于它后面的所有内容。
“Transparent”使 HTML 页的背景可以透过应用程序的所有透明部分进行显示，这样可能会降低动画性能。
“Opaque windowless”和“Transparent windowless” 都可与 HTML 层交互，并允许 SWF 文件上方的层遮蔽应用程序。这两种选项之间的差异在于“Transparent”允许透明，因此，如果 SWF 文件的某一部分是透明的，则 SWF 文件下方的 HTML 层可以透过该部分显示出来。
如果忽略此属性，默认值为 Window。仅适用于 object。
值
Window | Opaque | Transparent
模板变量：$WM
说明
（可选）使您可以使用 Internet Explorer 4.0 中的透明 Flash 内容、绝对定位和分层显示的功能。此标记/属性仅在带有 Flash Player ActiveX 控件的 Windows 中有效。
“Window”在 Web 页上用影片自己的矩形窗口来播放应用程序。“Window”表明 Flash 应用程序与 HTML 层没有任何交互，并且始终位于最顶层。
“Opaque” 使应用程序隐藏页面上位于它后面的所有内容。
“Transparent”使 HTML 页的背景可以透过应用程序的所有透明部分进行显示，这样可能会降低动画性能。
“Opaque windowless”和“Transparent windowless” 都可与 HTML 层交互，并允许 SWF 文件上方的层遮蔽应用程序。这两种选项之间的差异在于“Transparent”允许透明，因此，如果 SWF 文件的某一部分是透明的，则 SWF 文件下方的 HTML 层可以透过该部分显示出来。
如果忽略此属性，默认值为 Window。仅适用于 object。
因此，在HTML中将
2006年10月5日 20:08
转过来感慨下。主要是给我等不熟悉国内情况的朋友们看看。偶个人认为国内的比国外的难多了~~汗
各种漏洞的利用和一些搜索参数
说到漏洞，首先应该提到的就是动网的上传漏洞了。
"洞网"漏洞拉开了上传漏洞文件的序幕，其他系统的上
传漏洞接踵而来!
各种漏洞的利用和一些搜索参数
说到漏洞，首先应该提到的就是动网的上传漏洞了。
"洞网"漏洞拉开了上传漏洞文件的序幕，其他系统的上
传漏洞接踵而来!
2006年10月1日 20:07
在ASP编程中使用数组
数组的定义
Dim MyArray
MyArray = Array(1,5,123,12,98)
可扩展数组
Dim MyArray()
for i = 0 to 10
ReDim Preserve MyArray(i)
MyArray(i)=i
next
数组的定义
Dim MyArray
MyArray = Array(1,5,123,12,98)
可扩展数组
Dim MyArray()
for i = 0 to 10
ReDim Preserve MyArray(i)
MyArray(i)=i
next
2006年9月27日 20:05
Function AutoCreateFolder(strPath) ' As Boolean
On Error Resume Next
Dim astrPath, ulngPath, i, strTmpPath
Dim objFSO
If InStr(strPath, "\") <=0 or InStr(strPath, ":") <= 0 Then
AutoCreateFolder = False
Exit Function
End If
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
If objFSO.FolderExists(strPath) Then
AutoCreateFolder = True
Exit Function
End If
astrPath = Split(strPath, "\")
ulngPath = UBound(astrPath)
strTmpPath = ""
For i = 0 To ulngPath
strTmpPath = strTmpPath & astrPath(i) & "\"
If Not objFSO.FolderExists(strTmpPath) Then
' 创建
objFSO.CreateFolder(strTmpPath)
End If
Next
Set objFSO = Nothing
If Err = 0 Then
AutoCreateFolder = True
Else
AutoCreateFolder = False
End If
End Function
On Error Resume Next
Dim astrPath, ulngPath, i, strTmpPath
Dim objFSO
If InStr(strPath, "\") <=0 or InStr(strPath, ":") <= 0 Then
AutoCreateFolder = False
Exit Function
End If
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
If objFSO.FolderExists(strPath) Then
AutoCreateFolder = True
Exit Function
End If
astrPath = Split(strPath, "\")
ulngPath = UBound(astrPath)
strTmpPath = ""
For i = 0 To ulngPath
strTmpPath = strTmpPath & astrPath(i) & "\"
If Not objFSO.FolderExists(strTmpPath) Then
' 创建
objFSO.CreateFolder(strTmpPath)
End If
Next
Set objFSO = Nothing
If Err = 0 Then
AutoCreateFolder = True
Else
AutoCreateFolder = False
End If
End Function
