請教:為什么ListBox的onclick事件不執行?

scott21cn 2002-04-25 04:39:43
我采用非動態加入時,其onclick事件可以執行,但改成從數據庫中取數據后,其onclick事件就不執行了,什么原因?


<%
if Session("Account")<>"ADMIN" then
response.write "尚未登錄,請先登錄!"
response.end
end if
%>

<!--#include file="conn.asp"-->

<HTML>
<HEAD>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<META content="Microsoft FrontPage 4.0" name=GENERATOR><SCRIPT ID=clientEventHandlersJS LANGUAGE=javascript>
<!--

function select1_onclick() {
form1.text6.value = form1.select1.options(select1.selectedIndex).text
}

//-->
</SCRIPT>
</HEAD>

<BODY>

<FORM action="AddBook.asp" method=post name=form1>
<DIV align=center>
<CENTER>
<TABLE border=1 height=238 width="450">
<TBODY>
<TR bgColor=#e8f4ff>
<TD colSpan=2 height=36 width="390">
<P align=center>圖書資料輸入</P></TD></TR>
<TR bgColor=#f2f8ff>
<TD height=36 width="98">ISBN﹕</TD>
<TD height=36 width="286"><!--webbot bot="Validation"
B-Value-Required="TRUE" I-Maximum-Length="13" --><INPUT id=text3 name=txtISBN_ size=18 maxlength="13"></TD></TR>
<TR>
<TD bgColor=#f7fbff height=36 width="98">圖書名稱﹕</TD>
<TD bgColor=#f7fbff height=36 width="286"><INPUT id=text1 name=txtName_ size=24></TD></TR>
<TR>
<TD bgColor=#f7fbff height=36 width="98">索書號﹕</TD>
<TD bgColor=#f7fbff height=36 width="286"><INPUT id=text2 name=txtIndex_ size=18></TD></TR>
<TR>
<TD bgColor=#f7fbff height=36 width="98">作者﹕</TD>
<TD bgColor=#f7fbff height=36 width="286"><INPUT id=text4 name=txtAuthor_ size=18></TD></TR>
<TR>
<TD bgColor=#f7fbff height=36 width="98">譯者﹕</TD>
<TD bgColor=#f7fbff height=36 width="286"><INPUT id=text7 name=txtTranslator_ size=18></TD></TR>
<TR>
<TD bgColor=#f7fbff height=36 width="98">開本﹕</TD>
<TD bgColor=#f7fbff height=36 width="286"><!--webbot bot="Validation"
S-Data-Type="Integer" S-Number-Separators="," --><INPUT id=text12 name=txtSize_ size=18></TD></TR>
<TR>
<TD bgColor=#f7fbff height=36 width="98">價格﹕</TD>
<TD bgColor=#f7fbff height=36 width="286"><!--webbot bot="Validation"
S-Data-Type="Number" S-Number-Separators=",." --><INPUT id=text8 name=txtPrice_ size=18></TD></TR>
<TR>
<TD bgColor=#f7fbff height=36 width="98">版次</TD>
<TD bgColor=#f7fbff height=36 width="286"><INPUT id=text9 name=txtVerTime_ size=18></TD></TR>
<TR>
<TD bgColor=#f7fbff height=36 width="98">頁數﹕</TD>
<TD bgColor=#f7fbff height=36 width="286"><INPUT id=text10 name=txtPageNum_ size=18></TD></TR>
<TR>
<TD bgColor=#f7fbff height=36 width="98">冊數﹕</TD>
<TD bgColor=#f7fbff height=36 width="286"><INPUT id=text11 name=txtVolume size=18></TD></TR>
<TR>
<TD bgColor=#f7fbff height=36 width="98">叢書﹕</TD>
<TD bgColor=#f7fbff height=36 width="286"><INPUT id=text5 name=txtSeries_ size=18></TD></TR>
<TR>
<TD bgColor=#f7fbff height=36 width="98">出版社﹕</TD>
<TD bgColor=#f7fbff height=36 width="286"><INPUT id=text6 name=txtPublisher_ size=24 LANGUAGE=javascript onclick="return text6_onclick()">
<%
Response.Write "<SELECT id=select1 name=select1 size=2 style='HEIGHT: 62px; WIDTH: 179px' LANGUAGE=javascript onclick='return select1_onclick()'>"
dim rs
set rs = server.CreateObject("ADODB.Recordset")
strSQL = "SELECT NO_,Publisher_ FROM PublisherClass"
rs.Open strSQL,Conn,1,1
do while not rs.EOF
Response.Write "<OPTION value='" &rs.Fields("NO_").Value &"'>" &rs.Fields("Publisher_").Value &"</OPTION>"
rs.MoveNext
loop
rs.Close
set rs = nothing
CloseConn
Response.Write "</SELECT>"
%>
</TD></TR>
<TR>
<TD bgColor=#f7fbff height=36 width="98">出版日期﹕</TD>
<TD bgColor=#f7fbff height=36 width="286"><INPUT id=text12 name=txtPDate_ size=18>(如﹕2002-01-01)
</TD></TR>
<TR>
<TD bgColor=#f7fbff height=36 width="98"> </TD>
<TD bgColor=#f7fbff height=36 width="286"><INPUT id=button1 name=cmdFind style="HEIGHT: 27px; WIDTH: 73px" type=submit value=確定>
<INPUT id=button3 name=cmdCancel onclick = ClickCancel() style="HEIGHT: 27px; WIDTH: 73px" type=reset value=清除>
</TD></TR></TBODY></TABLE></CENTER></DIV>
</FORM>
<p align="center"><A href="Index.htm">返回</A></p>
</BODY>
</HTML>
...全文
82 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
jxwangzhigang 2002-04-25
  • 打赏
  • 举报
回复
"<SELECT id=select1 name=select1 size=2 style='HEIGHT: 62px; WIDTH: 179px' LANGUAGE=javascript onchange='return select1_onchange()'>"

function select1_onchange() {
form1.text6.value = form1.select1.options(select1.selectedIndex).text
}
就可以拉
jxwangzhigang 2002-04-25
  • 打赏
  • 举报
回复
采用onchang事件吧

28,391

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧