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組件->支持庫。
