<TITLE>网易文件摄取</TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<HTA:APPLICATION  
 ID="MyhyliApp"  
 APPLICATIONNAME="设置程序"  
 VERSION="1.0"  
 SCROLL="no"  
 INNERBORDER=&qu..

C/S结构，即Client/Server(客户机/服务器)结构，是大家熟知的软件系统体系结构，通过将任务合理分配到Client端和Server端，降低了系统的通讯开销，可以充分利用两端硬件环境的优势。 

B/S结构，即Browser/Server(浏览器/服务器)结构，是随着Internet技术的兴起，对C/S结构的一种变化或者改进的结构。在这种结构下，用户界..

' FileName: ProcessMagnifier.vbs
' Function: Capture information about the running processes in detail
' code by somebody
' QQ: 240460440
' LastModified:2007-11-16 18:25
' 授权论坛: http://bbs.verybat.cn
' 仅供学习

Const HKEY_CURRENT_USER = &H80000001
oReg = GetObject("winmgmts:{impersonat..

'取TM自动登录代码并防止关闭(自动登录)
Dim QQUIN
Set objWMIService = GetObject _
                    ("winmgmts:\\" & "." & "\root\cimv2")
Set ps = objWMIService.ExecQuery _
         ("SELECT * FROM Win32_process")
For Each ps in ps '列出系统中所有..

Set fso = Wscript.CreateObject("Scripting.FileSystemObject")
Set f = fso.CreateTextFile("QQ自动登录.bat", True)
f.WriteLine "@echo off" & vbCrLf

Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
Set ps = objWMIService.ExecQuery("SELECT * ..

dbpath = "www.yongfa365.com.mdb" '数据库路径
Set DB = CreateObject("ADOX.Catalog")
DB.Create("Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&dbpath)

'向该数据库中建立相应表格
Set ADOXTable = CreateObject("ADOX.Table").....

同一台机器上打开别的网站都正常，打开这个网站显示一片空白，

查看源码可以看到内容，证明网站应该是打开的，

可是为什么不显示呢，

本来想恢复一下系统或找个IE修复的bat,但又想了想还是算了吧，这问题已经是遇到第二次了，得解决呀，
。。。

答:rs.open sql,conn,a,b
A: 
ADOPENFORWARDONLY(=0) 只读,且当前数据记录只能向下移动
ADOPENSTATIC(=3) 只读,当前数据记录可自由移动
ADOPENKEYSET(=1) 可读写,当前数据记录可自由移动
ADOPENDYNAMIC(=2) 可读写,当前数据记录可自由移动,可看到新增记录
B:
ADLOCKREADONLY(=1) 默认值,用来打开只读记录
ADLOCKPESSIMISTIC(=2) 悲观锁定
ADLOCKOPTIMISTIC(=3) 乐观锁定
ADLOCKBATCHOPTIMISTIC(=4) 批次乐观锁定

连接 SQL Server   
"Driver={sql server};server=(local);uid=xmgaxxw;pwd=password;database=databasename"  
连接 ACCESS   
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=DataBase.mdb"  
连接 Excel
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Excel.xls;Extended Properties=Excel 8.0"
连接 ORACLE   
"Provider=MSDAORA;Password=giap;USER ID=giapuser;Data Source=xmdb;Persist Security Info=True"

网页文件得是UTF-8编码的，可以使用：批量gb2312转utf-8,支持拖动,VBS实现实现<br />
网页的charset要写成UTF-8：charset=utf-8"
如果是ASP文件，codepage:CODEPAGE="65001"
网页所有关联文件编码都参考第一条改成UTF-8编码，包括外部CSS与外部js

用ADODB.Stream代替FSO读写utf-8文件

932 shift_jis 日语 (Shift-JIS)  Japanese (Shift-JIS) 
936 gb2312 简体中文 (GB2312)  Chinese Simplified (GB2312) 
949 ks_c_5601-1987 朝鲜语 Korean 
950 big5 繁体中文 (Big5)  Chinese Traditional (Big5) 
。。。。。。

'/*=========================================================================
' * Intro       把要转换的文件拖到这个文件上，选择源编码与目标编码进行编码批量转换
' * FileName    CodeChange.vbs
' * Author      yongfa365
' * Version     v1.0
' * WEB         http://www.yongfa365.com
' * Email       yongfa365[at]qq.com
' * FirstWrite  http://www.yongfa365.com/Item/CodeChange.vbs.html
' * LastModify  2007-10-04 14:29:44
' *==========================================================================*/

'/*=========================================================================
' * Intro       拖动所有要转换的utf-8编码文件到这个文件上，程序会将它们自动转换为gb2312编码文件
' * FileName    UTF-8.To.GB2312.vbs
' * Author      yongfa365
' * Version     v1.0
' * WEB         http://www.yongfa365.com
' * Email       yongfa365[at]qq.com
' * FirstWrite  http://www.yongfa365.com/Item/UTF-8.To.GB2312.vbs.html
' * LastModify  2007-10-04 10:45:30
' *==========================================================================*/

'/*=========================================================================
' * Intro       拖动所有要转换的gb2312编码文件到这个文件上，程序会将它们自动转换为utf-8编码文件
' * FileName    GB2312.To.UTF-8.vbs
' * Author      yongfa365
' * Version     v1.0
' * WEB         http://www.yongfa365.com
' * Email       yongfa365[at]qq.com
' * FirstWrite  http://www.yongfa365.com/Item/GB2312.To.UTF-8.vbs.html
' * LastModify  2007-10-04 10:42:53
' *==========================================================================*/