Question

当链接上的鼠标悬停状态时，状态栏会在状态栏中显示链接的位置，如下图所示... 有没有办法改变\覆盖它以显示一些所需的文字...

alt text

Answer 1

出于安全原因（网络钓鱼），大多数浏览器会默认阻止尝试更改状态行。

无论如何你都可以尝试：

<a href="link" onmouseover="window.status='your text';" onmouseout="window.status='';">link here</a>

第二种方法：

<a href="your text" onclick="location.href='your url';return false">link here</a>

Con：例如，您无法使用Ctrl +单击在新的tabblad / window中打开它。

Answer 2

在ie9方法1中没有任何效果。方法2也通过将活动文件路径放在状态栏中而不是习惯性插值uri来破坏隐藏信息的目的：

C:\\\filepath\server\local\whatever

也许有一种方法可以使用方法2.可能是代理链接文件位置拦截。例如：

<a href="nothinghere" onclick="location.href='anylink';return false">click here</a>

其中c：\ links \ anylink链接到c：\ private \ privatefile ...？

此外：'骗局：无法在新标签页/新窗口中打开链接'... javascript？

Answer 3

这应该有效

<a href="/www.example.com/contact.html" onmouseover="window.status='Contact'" onmouseout="window.status=''">

Answer 4

如果您必须更改状态，以下是适用的跨浏览器解决方案：

<a href=".: This a link" onClick="window.location='myurl.html';return false">

下行是它需要Javascript

更改“这是指向所需文本的链接”并将“myurl.html”更改为窗口文件的路径。

如果您需要使用“_blank”打开网址，则可以创建一个打开新窗口的功能。

不幸的是“。：”必须出现在文本的前面，否则它将呈现为网址。在IE9中测试过。（Firefox和其他浏览器以不同的方式呈现

对于其他浏览器，您也可以使用“link：”然后使用您的网址。在Firefox中测试。

注意：出于安全原因，您只能更改Opera的window.status（以及可能的IE 6及更早版本），如其他人的建议所述。

Answer 5

当我们下次尝试向页面输入更多数据时，会从

    Sub HideAndUnHideProduct2()

'Are you sure you want to run this macro, when you run this a box will popup and ask yes or no
Dim varResponse As Variant
varResponse = MsgBox("This will Hide/UnHide Product 2 on All Sheets, Do You Want To Continue", vbYesNo, "Selection")
If varResponse <> vbYes Then Exit Sub

Application.ScreenUpdating = False

'Hides/UnHides Product columns on all sheets

If VPL.Columns("L:N").Hidden = True Then

'UnHides Specified columns On Specified Sheet
VPL.Columns("L:N").EntireColumn.Hidden = False 'Unhides Selected Colunms

'UnHides columns On All Sheets Except The Ones Specified Below
 Dim wsU As Worksheet
For Each wsU In Sheets
If wsU.Name <> "VPL" Then '<Sheets To Be Skiped From Loop
        'Code To Be Looped below
Columns("L:M").EntireColumn.Hidden = False 'UnHides Selected Colunms
    'End of Code To Be Looped
    End If
Next wsU

Else

'Hides Specified columns On Specified Sheet
VPL.Columns("L:N").EntireColumn.Hidden = True

'Hides columns On All Sheets Except The Ones Specified Below
Dim wsH As Worksheet
For Each wsH In Sheets
If wsH.Name <> "VPL" Then '<Sheets To Be Skiped From Loop
        'Code To Be Looped below
Columns("L:M").EntireColumn.Hidden = True 'Hides Selected columns
    'End of Code To Be Looped
    End If
Next wsH
End If
Application.ScreenUpdating = True

End Sub

个博客网站中删除

onmouseover或JavaScript。所以我认为，这个方法应该在我的Firefox浏览器中进行测试。

<!DOCTYPE html>

<html>

<head>

<style type="text/css">

.btn {
    border:none;
}

</style>


<form action="your url">
<input type="submit" class="btn" value="link here">

</form>

</body>

</html>

HTML - overRide状态栏链接位置显示

5 个答案: