ver脚本
⑴ 璇烽梾sql鑴氭湰閲宻et feedback off 鍜宻et verify off鍒嗗埆鏄浠涔堟剰镐濓纴镒熻阿
set verify(鎴杤er) on/off鍙浠ヨ剧疆鏄钖︽樉绀烘浛浠ｅ彉閲忚镟夸唬鍓嶅悗镄勮鍙ャ
set feedback
链変笁绉嶆柟寮忥细
set feedback on
set feedback off
set feedback n
榛樿ょ殑褰扑竴𨱒sql鍙戝嚭镄勬椂鍊欙纴oracle浼氱粰涓涓鍙嶉堬纴姣斿傝村垱寤鸿〃镄勬椂鍊欙纴濡傛灉鎴愬姛锛屽懡浠よ屼细杩斿洖绫讳技锛歍able created镄勫弽棣堬纴鍙堟瘆濡傛墽琛屼竴涓猵l/sql鎴愬姛镄勬椂鍊欙纴锻戒护琛屼细杩斿洖锛歅L/SQL procere successfully completed 銆傚綋杞借剼链涓杩愯屽緢澶氲鍙ョ殑镞跺欙纴涓鑸灏唂eedback璁句负off銆
set feedback n:褰扑竴𨱒sql璇鍙ヨ繑锲瀗鎴栬呭ぇ浜峦琛岃板綍镄勬椂鍊欙纴灏变细链塮eedback,姣斿傦细set feedback 5,褰撹繑锲炶板綍绛変簬鎴栧氢簬5琛岀殑镞跺欎细链夌被浼8 rows selected.镄勫弽棣.濡傛灉杩斿洖琛屽皯浜5鍒欐病链夋ゅ弽棣堛
⑵ 什么是“脚本文件”
一、啥叫脚本呢？
其实就是一段代码，作用就是：这些代码通过你的浏览器来鼓捣一下你的机器。这样，你就能通过点一下鼠标就可以发点欢迎词、发点情话啥地了。
脚本script是使用一种特定的描述性语言，依据一定的格式编写的可执行文件，又称作宏或批处理文件。脚本通常可以由应用程序临时调用并执行。各类脚本目前被广泛地应用于网页设计中，因为脚本不仅可以减小网页的规模和提高网页浏览速度，而且可以丰富网页的表现，如动画、声音等。举个最常见的例子，当我们点击网页上的E－mail地址时能自动调用Outlook Express或Foxmail这类邮件软件，就是通过脚本功能来实现的。又如洪恩网站�http�／／www．hongen．com一些网页的英文新闻内容旁会有一个三角符号，点击它就可以听到英文诵读，这也是脚本在起作用。 也正因为脚本的这些特点，往往被一些别有用心的人所利用。例如在脚本中加入一些破坏计算机系统的命令，这样当用户浏览网页时，一旦调用这类脚本，便会使用户的系统受到攻击。所以用户应根据对所访问网页的信任程度选择安全等级，特别是对于那些本身内容就非法的网页，更不要轻易允许使用脚本。通过“安全设置”对话框，选择“脚本”选项下的各种设置就可以轻松实现对脚本的禁用和启用。
解释二
动态程序一般有两种实现方式，一是二进制方式，一是脚本方式。
二进制方式是先将我们编写的程序进行编译，变成机器可识别的指令代码（如.exe文件），然后再执行。这种编译好的程序我们只能执行、使用，却看不到他的程序内容。
脚本简单地说就是一条条的文字命令，这些文字命令是我们可以看到的（如可以用记事本打开查看、编辑），脚本程序在执行时，是由系统的一个解释器，将其一条条的翻译成机器可识别的指令，并按程序顺序执行。因为脚本在执行时多了一道翻译的过程，所以它比二进制程序执行效率要稍低一些。
我们上面提到的各种动态语言，如ASP、PHP、CGI、JSP等，都是脚本语言。
按目前的服务规则，虚拟主机网站只能采用脚本语言来实现
⑶ 中国CS脚本网专用1.6 GUI脚本 Ver1.0.
一般正常的比赛是不许用脚本的．．比赛只能调分辨率鼠标和键盘什么的．．．这个脚本把弹道改的很直．．所以你用起来很舒服．．
⑷ VBS脚本，登录CRT脚本该怎么写
# $language = "VBScript"
# $interface = "1.0"
'=====================================================
' 山东**集团
' By Klsjnh
' Ver 0.5
' 2014.10.22 21:44
'=====================================================
' 从列表中读取交换机地址
' v0.5 修改了 巡检中错误会停止的错误
' 修改了 寻找 more的方式
'
Sub Main
On Error Resume Next '出错忽略
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim objFso,objFile,strLine,aryParams
Set objFso= CreateObject("Scripting.FileSystemObject")
Set objFile= objFso.OpenTextFile("D:Klsjnh网络脚本iplist.ini",Forreading, False )
crt.Screen.Synchronous = True
strFolder=createFolder & ""
DO While objFile.AtEndOfStream <> True
strLine = objFile.ReadLine
aryParams=Split(strLine)
crt.Session.Connect "/TELNET " & aryParams(0)
If crt.Session.Connected Then
crt.session.LogFileName = strFolder & aryParams(0) & "_" & Replace(Date,"/","-") & ".txt"
crt.session.Log(true)
If aryParams(1) = 1 Then '登陆模式 1 telnet 密码
crt.Screen.WaitForString "Password:"
crt.Screen.Send aryParams(2) & vbcr
End If
If aryParams(1) = 2 Then '登陆模式 2 特权模式
crt.Screen.WaitForString "Password:"
crt.Screen.Send aryParams(2) & vbcr
crt.Screen.WaitForString ">"
crt.Screen.Send "su" & vbcr
crt.Screen.WaitForString "Password:"
crt.Screen.Send aryParams(2) & vbcr
End If
'================================巡检部分================================
crt.Screen.WaitForString ">"
crt.Screen.Send "dis log" & vbcr
Do Until crt.Screen.WaitForString("---- More ----",2) <> -1
crt.Screen.Send " " & vbcr
Loop
'========================================================================
crt.Session.Disconnect
crt.session.Log(False)
Else
appendTextFile "发生错误： " & aryParams(0) & " 。(" & now() & ")"
End If
Loop
If Err.Number = 0 Then
crt.Dialog.MessageBox("所有交换机巡检成功....")
Else
crt.Dialog.MessageBox("所有交换机巡检完成，部分交换机有错误....")
End If
crt.Screen.Synchronous = False
End Sub
Public Function createFolder() '创建以当前日期为名的 文件夹
Dim objFso,objFolder,strFolderName
Set objFso = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFso.getfolder("D:Klsjnh网络巡检")
strFolderName = now()
strFolderName = Left(strFolderName,InStr(strFolderName,Chr(32))) '取空格之前的部分
strFolderName = Mid(strFolderName,6,Len(strFoldername)-6) '取日期
strFolderName = Replace(strFolderName,"/","_")
strFolderName = objFolder & "" & strFolderName
If objFso.FolderExists(strFolderName)<>True Then
objFso.CreateFolder(strFolderName)
End If
createFolder = strFolderName
End Function
Public Function appendTextFile(strFileText) '打开文件追加
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim objFso,objFile,strLine
Set objFso = CreateObject("Scripting.FileSystemObject")
strFilePath = "D:Klsjnh网络交换机巡检错误日志.log"
Set objFile = objFso.OpenTextFile(strFilePath,ForAppending, True )
objFile.WriteLine strFileText
objFile.close
Set objFile = Nothing
Set objFso = Nothing
End Function
⑸ 鐢ㄦ壒澶勭悊鎴栬匳BS鑴氭湰璁剧疆WIN/XP绯荤粺灞忓箷淇濇姢绋嫔簭銆佺瓑寰呮椂闂村拰鎭㈠嶆椂鏄剧ず瀵嗙爜
@echooff&title涓阌璁剧疆灞忓箷淇濇姢By渚濇ⅵ鐞寸懚
::璁剧疆灞忓箷淇濇姢绋嫔簭璺寰
setScrFile=%SystemRoot%System32鎴戠殑灞忓箷淇濇姢.scr
::璁剧疆绛夊緟镞堕棿锛埚垎阍燂级锛屾湁鏁埚硷纸1-9999锛
setTimeOut=10
::璁剧疆鏄钖﹀惎鐢ㄧ橱褰曞睆骞曪纴1钖鐢锛0绂佺敤
setLogin=1
::鏄钖︾珛鍗崇敓鏁堬纴1绔嫔嵆锛堢郴缁熷皢浼氭敞阌褰揿墠甯愭埛锛夛纴鍏跺畠鏁板瓧涓嬫″紑链哄悗鐢熸晥
setEffective=1
::涓绘墽琛屼唬镰
ver|find"5.1.">nul&&gotoSetting
%1echo姝ｅ湪璇锋眰绠＄悊锻樻潈闄愩伞伞&&mshtavbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c%~s0::","","runas",1)(window.close)&&exit
:Setting
set/aTimeOut*=60
set"Key=HKCUControlPanelDesktop"
regadd"%key%"/vSCRNSAVE.EXE/tREG_SZ/d"%ScrFile%"/f
regadd"%key%"/vScreenSaveTimeOut/tREG_SZ/d"%TimeOut%"/f
regadd"%key%"/vScreenSaverIsSecure/tREG_SZ/d"%Login%"/f
echo,&echo,
if%Effective%equ1(
echo鎸変笅浠绘剰阌锛岀郴缁熷皢娉ㄩ攒褰揿墠甯愭埛锛屽啀娆＄橱褰曞悗锛岀浉鍏宠剧疆鍗冲彲鐢熸晥銆
pause>nul
shutdown/l>nul2>nul
)else(
echo鎸変笅浠绘剰阌锛屽皢鐩存帴阃鍑鸿剼链锛屼絾灞忓箷淇濇姢璁剧疆椤甸溃镄勫弬鏁板彲鑳戒笉浼氭湁鍙桦寲銆备絾链夊彲鑳借剧疆宸茬粡鐢熸晥锛屽缓璁娉ㄩ攒甯愭埛鎴栭吨钖鐢佃剳锛屼互渚挎ｅ父鐢熸晥銆
pause>nul
)
exit
⑹ 如何使用大漠插件
1、 先点击工具，再点击 类型库或ocx组件->支持库。
