其他

字元統計功能模組 複製代碼 代碼如下:Sub TongJi() Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFile = objFSO.OpenTextFile("ok.txt", 1) strText = objFile.ReadAll All = Len(strText) S="` ~ ! @ # $ % ^ & * ( ) - _ = + \ | [ { ] } ; : ' , < . >

複製代碼 代碼如下:'**************************** '*by r05e '*檢驗SQL SERVER是否在這機器上工作 '**************************** strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

1、執子之手，方知子醜，淚流滿面，子不走我走。 2、西遊記告訴我們：凡是有背景妖怪都被接走了，凡是沒背景都被一棒子打死了。 3、你有什麼不開心的事？說出來讓大家開心一下。 4、我那麼喜歡你，你喜歡我一下會死啊。 5、我又不是人民幣，怎麼能讓人人都喜歡我？！ 6、令人不能自拔的，除了牙齒還有愛情。 7、當生活心懷歹毒地將一切都搞成了黑色幽默，我順水推舟把自己變成了一個受過高等教育的流氓。 8、時間太瘦，指縫太寬。

但是初學者慎用，千萬不要隨便拿來掩蓋錯誤，否則以後程式出現莫名其妙的問題，改都沒法改 使用完畢要記得關閉錯誤捕獲器on error goto 0 文法如下: ======================================================= on error resume next '開啟錯誤捕獲，以下錯誤語句將被跳過， 同時內部對象err將紀錄最後一個觸發的錯誤資訊 on error goto 0 '關閉錯誤捕獲 ==========================

建議學習jquery的朋友學習下，瞭解下思路。主要方法:$.browser.['瀏覽器關鍵字'] 代碼： 複製代碼 代碼如下:<script type="text/javascript"> $(function() { if($.browser.msie) { $( function() { alert("this is msie"); }); } else if($.browser.safari) { $( function() { alert("this is safari!")

複製代碼 代碼如下:<script language="javascript" type="text/javascript"> //add by ahuinan 2009-8-17 //initialize(23.165613663312594,113.35968017578125) var map; var gdir; var marker2; var hasMarker = false; var hotelLatLng = new GLatLng(<%=initxy

沒事寫個尋路的，很簡單 複製代碼 代碼如下:function xy45(x1, y1) {//直角座標轉斜45度 var x0 =0; var y0 =0; var s=-Math.PI/4; var o={}; o.x = int((x0+x1*Math.cos(s)+y1*Math.sin(s)))+dx; o.y =-int((y0+x1*Math.sin(s)-y1*Math.cos(s)))/2+dy; return o; } function rot45(x1, y1) {//斜45

使用方法：將下面的代碼儲存為jb51.vbs然後拖動你儲存在本地的htm頁面，拖放在這個vbs即可複製代碼 代碼如下:'備忘：URL篩選小工具 '防止出現錯誤 On Error Resume Next 'vbs代碼開始---------------------------------------------- Dim p,s,re If Wscript.Arguments.Count=0 Then Msgbox "請把網頁拖到本程式的表徵圖上！",,"提示" Wscript.Quit End

1、指令碼之家 歡迎大家2、最近增加了不少的伺服器，提供更好的速度3、網速實在太慢了 [Ctrl+A 全選 注:如需引入外部Js需重新整理才能執行]核心代碼：複製代碼 代碼如下:<script type="text/javascript"> str=document.getElementById("textareaobj").value;//擷取文本域內容 if(document.all){ // 如果是IE，怎麼判斷瀏覽器類型，自己找代碼 arr=str.split("\r\n")

微軟的AJAXControlToolKit提供了很容易的擴充方式,小弟我也是初學ajaxcontroltoolkit的擴充,所以這裡舉個例子,一起來學習,如果有什麼好的建議和例子請提出來一起分享. 其實Microsoft的ajax官網給出的擴充說明已經很詳細了,而且有個例子,嚴格來說確實有點簡單,但是總結一下每個擴充控制項大致需要注意如下幾點: 1. 必須添加的dll: System.Web.dll , System.Web.Extensions.dll, System.Design.dll,

jQuery入門指南教程 這個指南是一個對jQuery庫的說明，要求讀者瞭解HTML(DOM)和CSS的一些常識。它包括了一個簡單的Hello World的例子，選取器和事件基礎，AJAX、FX的用法，以及如何製作jQuery的外掛程式。 這個指南包括了很多代碼，你可以copy它們，並試著修改它們，看看產生的效果。 內容提要 安裝 Hello jQuery Find me:使用選取器和事件 Rate me:使用AJAX Animate me(讓我生動起來):使用FX Sort me(將我有序化)

sql xml 入門: --by jinjazz 1、xml: 能認識元素、屬性和值 2、xpath: 定址語言，類似windows目錄的尋找(沒用過dir命令的話就去面壁) 文法格式，這些文法可以組合為條件： "."表示自己，".."表示父親，"/"表示兒子，"//"表示後代， "name"表示按名字尋找，"@name"表示按屬性尋找 "集合[條件]" 表示根據條件取集合的子集，條件可以是 數 值：數字,last(),last()-數字 等

和大家分享一下代碼： JavaScript代碼 複製代碼 代碼如下://得到select項的個數 jQuery.fn.size = function() { return jQuery(this).get(0).options.length; } //獲得選中項的索引 jQuery.fn.getSelectedIndex = function() { return jQuery(this).get(0).selectedIndex; } //獲得當前選中項的文本

網頁錯誤詳細資料使用者代理程式: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; WOW64; Trident/4.0; QQDownload 551; SLCC2; .NET CLR 2.0.50727)時間戳記: Wed, 12 Aug 2009 07:02:03 UTC訊息: HTML Parsing Error: Unable to modify the parent container element before the

複製代碼 代碼如下:'中文姓名筆畫計算（VBS指令碼版） dim word,key word=inputbox("請輸入你要計算的文字") if word="" then msgbox "小樣 不是叫你不要輸入文字嗎" Wscript.Quit end if key=char_wordnum(word) msgbox key Function char_wordnum(my_char_word) dim

例如： 複製代碼 代碼如下:document.getElementById("someID").innerText("hi"); 如果ID為"someID"的元素不存在，我們將得到Javascript運行錯誤：document.getElementById("someID") is null 正確的寫法應該是： 複製代碼 代碼如下:obj = document.getElementById("someID"); if (obj){ obj.innerText("hi"); }

解決window.open後返回object的錯誤 複製代碼 代碼如下:<a href="javascript:void(window.open('','','width=200,height=200'))">window.open()</a> 只在js的外層加上一個void不帶返回參數的聲明. 順便在這裡將window.open函數的參數使用也列出來： window.open函數參數列表 window = object.open([URL ][, name ][,

在互連網經濟蓬勃發展的時代，一個人建設幾個網站已經不足為奇，在這樣的情況下，建站對空間的需求也更加多樣化，因此支援多子網站的空間也就應運而生。一個空間支援多個子網站，能夠滿足站長對建設多個網站的需求，這是互連網催生建站熱潮的一次飛躍性發展。 　　多子網站的空間能夠實現一個網域名稱訪問多個豐富多彩的網站，它不但只有一個主網域名稱，還支援多個子網域名稱，而子網域名稱能有跟主網域名稱一樣的功能。那一個空間是怎麼實現多個子網站的支援呢?

複製代碼 代碼如下:'run_ie_reinstall.vbs - Runs the Internet Explorer Setup '?Doug Knox - 4/10/2002 'Downloaded from www.dougknox.com X = MsgBox("Do you want to reinstall Internet Explorer?", vbYesNo, "Prompt!") Y = MsgBox("Do you want to reinstall Outlook

1. 每個ui外掛程式現在都有自己單獨的css檔案，但是要根據情況與ui.theme.css ui.core.css結合使用，否則有些效果還是顯示不出來的。 eg. datepicker就必須同時引用上述兩個css檔案；accordion 只須引入ui.theme.css即可。這個我會把每個外掛程式獨立的demo放在我的資源裡邊的。 2. ui.accordion HTML 程式碼要遵循一定的格式要求： 複製代碼 代碼如下:<ul id="example"> <