【发布时间】:2014-06-04 09:29:31
【问题描述】:
我希望在鼠标悬停在名为 Log 的按钮上时显示“Hello world”的小窗口。现在,我定义了一个按钮操作 LogOpen(),它会打开 Log 按钮的日志文件 onclick。
如何在 Log 按钮上执行两个操作,以便 onmouseover 应显示提示,并且同一 Log 按钮的 onclick 应按原样获取日志文件目前?
任何示例代码 sn-ps 将有助于如何处理 mouseover() 事件以及我下面代码的 OnClick() 事件。
LogOpen() 函数:-
<script type="text/Vbscript">
Option Explicit
Dim File
File = "C:\\test.txt"
'***********************************************************
Sub LoadMyFile()
myDiv.innerHTML = LoadFile(File)
End Sub
'***********************************************************
Function LogOpen(File)
On Error Resume Next
Dim fso,F,ReadMe,Tab,i,paragraphe
Set fso = CreateObject("Scripting.FileSystemObject")
Set F = fso.OpenTextFile(File,1)
LoadFile = Err.Number
If Err.Number <> 0 Then
MsgBox Err.Description,16," Error"
Exit Function
End If
ReadMe = F.ReadAll
Tab = split(ReadMe,vbcrlf)
For i = lbound(Tab) to ubound(Tab)
paragraphe=paragraphe & Tab(i) & "<br>"
Next
LoadFile = paragraphe
End Function </script>
HTML 日志按钮
<input type="button" name="Log" id="Start" value="Log" onclick="LogOpen()">
提示消息未显示 onmouseover()
<script language="javascript">
document.getElementById("Start").onmouseover = function() {
alert("hi")
}
</script>
JS 位置
<body text="black">
<table>
<p> Log</p>
<input type="button" name="Log" id="Start" value="Open Dctm" onclick="LogOpen()">
</tr><br/>
</table>
<Div id="myDiv"></Div>
<td height="37" width="495" align="center">
<script language="javascript">
document.getElementById("Start").onmouseover = function() {
alert("hi")
}
</script>
</body>
【问题讨论】:
标签: html vb.net vbscript event-handling onmouseover