PDA

【圖片】神奇的圖片，誰能告訴我原理啊？




頁 : 1 2 [3]
TomX
2003-08-04, 04:20 PM
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=big5">

<SCRIPT language=VBScript>
<!--
function openit()
Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection

if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
End If
END function
-->
</SCRIPT></HEAD>
<BODY>

<FONT FACE="新細明體" LANG="ZH-TW"><P><IMG SRC="你的圖檔位置" WIDTH=57 HEIGHT=57 onclick="openit()"></P></FONT>

</body></HTML>
這樣寫才對



Jarren
2003-08-05, 12:19 AM
最初由 meilinhc 發表
Jarren前輩及其他前輩:
幫我看一下,到底是哪裡錯了?謝謝!!
....

兩個 <img...> 標籤中 src 指的圖案檔名不同，一個是 Image2.jpg，一個是 Imag2.jpg，不知兩個是否同一個？而第一個<img> 無 onclick動作，也許你本意如此吧。
基本上如果你這網頁只是在自己電腦上看，src 屬性為硬碟路徑也沒關係。
如果是弄到網站上供人瀏覽，src 屬性就必須寫成 src="Image.jpg"，和主網頁在放在同一資料夾裡。

第二個<img ...> 雖然放在</body>後面，雖然仍是有效的，只是順序上有點亂，還是將其放在</body>前面比較好。

而<Script ...>...</Script>這段碼的位置，你放的位置是有效的。甚至就算是放在<html>前面也可以。


另外，如果你不想一次開啟所有光碟機，而是不同圖案開啟不同光碟機的話，可以這樣改：
<SCRIPT language=VBScript>
<!--
Function openit(i)
Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection

colCDROMs.Item(i).Eject

End Function
-->
</SCRIPT>

開啟第一個光碟機的<img ...> 如下:
<img src="第一張圖片的路徑" onclick="openit(0)">

開啟第二個光碟機的<img ...> 如下:
<img src="第二張圖片的路徑" onclick="openit(1)">

再試看看吧;)
meilinhc
2003-08-05, 01:14 AM
終於成了!!

謝謝Jarren, TonX的詳細解說......Many Thanks!!:)
meilinhc
2003-08-05, 01:16 AM
Sorry!!
是TomX:)
Joseph Chang
2003-08-16, 09:08 PM
原來蓋子會寫程式?看在這麼多年的老朋友份上了,啥時幫我寫個蓋子自動消失程式?;)
speed101
2003-08-16, 11:10 PM
請問有哪位仁兄 可以把他寫成 執行檔 好嗎~~ 我有台老舊的TEAC 532E 托盤都很難退出，用這東西好像比較會成功將托盤退出來耶 ~~萬分感激!! 記得PM給我喔~~3Q3Q~~
mors
2003-08-17, 02:17 AM
最初由 想了好久 發表
http://kmserv.com/testbed/cd.htm
點下去 硬體也會有反應喔...CC

=.=" 嚇死我老人家了