标题:HTML里button的名字是变量,vbscript里该怎么表示
只看楼主
Kettyjin1983
Rank: 1
等 级:新手上路
帖 子:303
专家分:0
注 册:2007-8-17
结帖率:66.67%
 问题点数:0 回复次数:10 
HTML里button的名字是变量,vbscript里该怎么表示
HTML里button的名字是变量,vbscript里该怎么表示
<select name=<% =manage %> size="1">
    <option value="wait">****select</option>
    <option value="accept">accept</option>
    <option value="reject">reject</option>
</select>
<script language="VBScript">
function action_OnClick()
    if Form1.manage.option.value = "accept" then---这个地方该怎么写啊??
    MsgBox "You have accepted this barcode!"
    elseif Form1.manage.option.value = "reject"  then
    MsgBox "You have rejected this barcode!"
    end if
    Form1.submit
    
end function
</script>
搜索更多相关主题的帖子: vbscript option 变量 button 
2008-02-21 10:30
dhdhzzw
Rank: 1
等 级:新手上路
帖 子:949
专家分:0
注 册:2007-8-13
得分:0 
dim manage
manage= <%=manage %>
2008-02-21 11:23
Kettyjin1983
Rank: 1
等 级:新手上路
帖 子:303
专家分:0
注 册:2007-8-17
得分:0 
不是,是在vbscript里面怎么表示,不行.
2008-02-21 13:07
smlx9807
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2005-8-4
得分:0 
请可以使用javascript 来实现!用ID属性进行引用。
2008-02-21 14:02
Kettyjin1983
Rank: 1
等 级:新手上路
帖 子:303
专家分:0
注 册:2007-8-17
得分:0 
能否回答的具体点啊,不太懂Javascript...
2008-02-21 14:46
multiple1902
Rank: 8Rank: 8
等 级:贵宾
威 望:42
帖 子:4881
专家分:671
注 册:2007-2-9
得分:0 
<input name="<%=manage%>" ..... />

<script language="vbscript">
document.<%=manage%>.value="test"
</script>
2008-02-21 14:51
Kettyjin1983
Rank: 1
等 级:新手上路
帖 子:303
专家分:0
注 册:2007-8-17
得分:0 
还是不行,贴出原代码,再帮我看看是哪错了...
<script language="VBScript">
function action_OnClick()
    select case document.form1.<% =manage %>.option.value
        case "wait"
        MsgBox "This barcode is still wait your response!"
        case "accept"
        MsgBox "You accept this barcode!"
        case "reject"
        MsgBox "You reject this barcode!"
    end select
    form1.submit
end function
</script>
------
<td><select name=<% =manage %> size="1">
            <option value="wait">****select</option>
            <option value="accept">accept</option>
            <option value="reject">reject</option>
            </select>
            
            </td>
<input type="button" name="action" value="take action">
2008-02-21 15:51
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
得分:0 
VBScript的写法
<script language="VBScript">
Dim manage
function action_OnClick()
     manage=document.all("<% =manage %>")
     manageValue=manage.options(manage.selectedIndex).value
     select case manageValue
        case "wait"
        MsgBox "This barcode is still wait your response!"
        case "accept"
        MsgBox "You accept this barcode!"
        case "reject"
        MsgBox "You reject this barcode!"
    end select
    form1.submit
end function
</script>
javascript的写法
<script language="javascript">
var manage;
function action_OnClick()
{
     manage=document.form1.<% =manage %>;
     manageValue=manage.options[manage.selectedIndex].value;
     switch(manageValue)
     {
        case "wait":
             alert("This barcode is still wait your response!");
        break;
        case "accept":
             alert("You accept this barcode!");
        break;
        case "reject":
             alert("You reject this barcode!");
        break;
    }
    document.form1.submit();
}
</script>

[[it] 本帖最后由 yms123 于 2008-2-21 16:15 编辑 [/it]]
2008-02-21 16:12
Kettyjin1983
Rank: 1
等 级:新手上路
帖 子:303
专家分:0
注 册:2007-8-17
得分:0 
manage.options(manage.selectedIndex).value中的selectedIndex是什么意思,与manage.options.value有什么区别啊?
2008-02-22 15:29
tianyu123
Rank: 1
等 级:新手上路
威 望:2
帖 子:576
专家分:0
注 册:2007-8-26
得分:0 
manage.options(manage.selectedIndex).value
selectedIndex
表示当前选项的索引值,索引值从0开始,依次递增。就像数组的索引值。

改变一切,须从改变观念开始!
2008-02-22 16:04



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-200498-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.088815 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved