VBScript到颜色输入文本字段

问题描述：

我有一个输入文本字段，它有一个灰色的示例值。当点击字段时，文本被擦除并且颜色被设置为黑色。然后，在完成一些VBScript之后，字段被清除并且示例返回到输入字段中，但是我无法在此处将它着色为灰色。

除UserName.style =“color：#ccc;”之外的所有内容均正常工作在VBScript中。

我在这里错过了什么吗？ VB错误说“未执行”

任何解决方案高度赞赏。谢谢。

的VBScript：

UserName.value = "Example: JSmith" 
UserName.style = "color: #ccc;" 
</SCRIPT>

HTML：

<input type="text" name="UserName" value="Example: JSmith" style="color: #ccc;" onfocus="myFunction(UserName)"><p>

JavaScript的：

function myFunction(x) 
{ 
x.style.color="black"; 
x.value=""; 
}

尝试'UserName.setAttribute “风格”， “颜色：#CCC;”' –

我承担你的意思是asp.net？ – JohnFx

#cccccc怎么样... – matzone

答

的VBScript/.HTA演示：

<html> 
<head> 
    <Title>colortext</Title> 
    <hta:application id="colortext" scroll = "no"> 
    <script type="text/vbscript"> 
    Function CBT() 
    ' change backgound color of txtDemo 
    Dim txtDemo : Set txtDemo = document.getElementById("txtDemo") 
    Select Case txtDemo.style.backgroundColor 
     Case "black" 
     txtDemo.style.backgroundColor = "yellow" 
     Case "yellow" 
     txtDemo.style.backgroundColor = "red" 
     Case Else 
     txtDemo.style.backgroundColor = "black" 
    End Select 
    End Function 
    </script> 
</head> 
<body> 
    <input type="text" id="txtDemo" value="Initial Value" /> 
    <hr /> 
    <input type="button" value="CBT" onclick="CBT" /> 
</body> 
</html>

重要的部分是获取HTML元素document.getElementById("txtDemo")及其 .style.backgroundColor属性。

不是我想要的。字体颜色需要在焦点上改变，并在脚本完成时恢复。我想出了解决方案，会在一秒内发布。谢谢！ – AdrianM

答

的VBScript：

Call initialColor() 
UserName.value = "Example: JSmith"

HTML：

<input type="text" name="UserName" value="Example: JSmith" style="color: #ccc;" onfocus="myFunction(UserName)"><p>

的JavaScript：

function changeColor(x) 
{ 
x.style.color="black"; 
x.value=""; 
} 
function initialColor() 
{ 
UserName.style.color="ccc"; 
Manager.style.color="ccc"; 
Ticket.style.color="ccc"; 
}

VBScript到颜色输入文本字段

相关推荐