網頁應用資料區


VB Script

特殊的按鈕連結網頁的做法

<input type=button value="EZS 魔力寶貝版" id=command1 onclick="c1()" >
 


<script language="VBScript">

sub c1()
Parent.Frames(1).Location.Assign "http://http://ezs.no-ip.org/ezs/ezs-cg/index1.htm"
end sub

</script>


狀態列 讀取條

<Script Language="VBScript">
<!--
Dim Bar, Line, SP
Bar = 0
Line = "|"
SP = 100
Function Window_onLoad()
Bar = 95
SP = 10
End Function
Function Count()
If Bar < 100 Then
Bar = Bar + 1
Window.Status = "讀取狀態:" & Bar & " % " & " " & String(Bar, Line)
setTimeout "Count()", SP
Else
Window.Status = "讀取狀態:完成!"
Document.Body.Style.Display = ""
End If
End Function
Call Count()
-->
</Script>
 

 

Java Script

防止複製資料的跳窗

<script language="JavaScript">
<!--
if (navigator.appName.indexOf("Internet Explorer") != -1)
document.onmousedown = noSourceExplorer;
function noSourceExplorer(){if1 (event.button == 2 | event.button == 3)
{
alert("想對我的網頁做啥!\n沒事快走!\n小毛站長留!");}}
// -->
</script>


隨機音樂撥放器

<form name="midi" style="margin-top: 0; margin-bottom: 0" target="main">
<select name="select" onChange="cmid()" class="buttom">
<option value="001">sz_sky</option>
<option value="002">魔法老師-近衛木乃香</option>
<option value="003">魔法老師-明日菜與伊文</option>
<option value="004">魔法老師-戰鬥曲</option>
<option value="005">魔法老師-黑暗福音-1</option>
<option value="006">魔法老師-黑暗福音-2</option>
<option value="007">魔法老師-雨後的天使</option>
<option value="008">魔法老師-圖書館探險部</option>
<option value="009">魔法老師-片頭曲</option>
</select>
<span id="midiselect">
<embed width="151" height="42" loop="-1" align="absbottom" src="../music/001.mp3" onChange="cmp3()" style="margin-top: 0; margin-bottom: 0">
</span>
</form>

PS.
紅色
部分為 檔案名稱 ex:001.mp3 002.mp3 ...
綠色部分為 第一首歌曲預設
桃紅部分為 檔案的副檔名 ex: .mp3

<script language="JavaScript">
var mp3 = new Array()
for(i=1;i<9;i++){
mp3[i] = i+".mp3";
}

function cmp3(){
var mid = document.midi.select[Math.floor(Math.random() * mp3.length)-1].value
midiselect.innerHTML = '<embed src="../music/'+mid+'.mp3" width="151" height="42" loop="-1" align="absbottom">'
}

function cmid(){
var url = document.midi.select.selectedIndex
var mid = document.midi.select[url].value
midiselect.innerHTML = '<embed src="../music/'+mid+'.mp3" width="151" height="42" loop="-1" align="absbottom">'
}
</script>

 

 

VB研究小站
http://vb.ncis.com.tw/

SMG1.43 下載器
http://www.ziddu.com/download.php?uid=cbGimpenbrCcluKnaaqhkZSpZquhnZqo9

ATnotes 環保又免費的便利貼
http://toget.pchome.com.tw/intro/business_note/6057.html
  ATnotes 可以讓你在電腦上使用便利貼,不僅環保實用,使用上一點也不必怕浪費,而且它還是個完全免費的軟體,絲毫不必花你半毛錢。
推薦原因 他還能網路傳送字條給有安裝的對方

Chat Watch 可儲存多種即時聊天的對話紀錄
http://toget.pchome.com.tw/intro/network_tool/network_tool_monitor/17485.html
  Chat Watch 能夠幫你監控 ICQ、AOL、MSN 以及 Yahoo Messenger 所有送出及收到的即時資訊,Chat Watch 也擁有一個在執行時完全隱藏自己的強大的功能,這樣使用者就不會知道你的監控了,Chat Watch 執行和操作都非常簡單。它可以讓父母預防孩子使用 ICQ、AOL IM、MSN Messenger 以及 Yahoo Messenger 來進行一些不適當的對話。  

Iconize - 把全部的視窗都縮到系統欄中
http://toget.pchome.com.tw/intro/utility_desktop/utility_desktop_window/23682.html
  工具列中有許多開啟的程式看起來讓人覺得雜亂無章嗎?這麼多程式項目,暫時不用又不關閉時,看起來還真是凌亂呢。就讓 Iconize 幫你把他們都縮到系統欄去吧。

WinVNC 能讓你遠端遙控不同的作業系統
http://toget.pchome.com.tw/intro/network_tool/network_tool_remote/4821.html
http://www.softking.com.tw/soft/download.asp?fid3=22037
  WinVNC 是 VNC (Virtual Network Computing) 眾多作業平台版本中的一員,它可以安裝在 Windows 中而讓使用者在世界各地直接利用瀏覽器 (或利用其內附的 vncviewer 程式) 遠端遙控自己的電腦,就算是遙控不同的作業平台也沒有問題喔!

meebo - 綠化及時通MSN
http://www.meebo.com/index-ch.html
  什麼時代啦 還在下載即時通? 忍受傳檔案的超龜速? 6種 各類時即通都能通訊的網頁形及時通 登場~~~ 利用FTP傳檔案 速度真優

蛋頭之家 - 及時通工程的網頁 (內涵 魔獸中文ID)
http://uhongkong.net/~a255148/

 

 

網站建置百寶箱 Java Script區

網站建置百寶箱 VB Script區

小毛我特別推薦去看看的兩區喔˙ˇ˙

 

及時通 應用 轉貼
2008-1-27 22:25 27591881
ymsgr:im?+&msg=訊息   (不知怎解釋,試試看就知道)
ymsgr:sendIM?帳號 (只定帳號 開啟對話框)
P5eixEV ]A @g ymsgr:sendim?帳號&m=訊息  (密只定帳號 並且自動打上訊息)
ymsgr:callpc?to=帳號 (對指定帳號 直接進行語音通話)-{1| paqa_3V
ymsgr:chat?+  (跟SendIM一樣的功能)5vvXc#u]h
ymsgr:addfriend?+帳號   (點了 就問要不要加好友)
0]@:zsN ymsgr:getimv?網址 (點了就自動下載 聊天情境,但一定要官方的一種怪網址)
這些是我自己 慢慢找出來的= =..... 因該是全部了! 很早就發現嚕~! 只是不知道要不要發表....???

2008-1-28 14:01 henry10100
ymsgr:displayimage?pic=圖檔連結 (把圖片加入大頭貼)D[aTCE"hN
例如[code]ymsgr:displayimage?pic=http://tw.yimg.com/i/tw/messenger/v2/disp_bluemei1.png[/code]