在Sub Submit4_OnClick 和 End Sub中间能加的代码吗?

qingtianre 2006-07-27 03:51:07

<SCRIPT LANGUAGE="VBScript">

</SCRIPT>

...全文

138 5 打赏收藏转发到动态举报

写回复

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

fls975 2006-07-27

打赏
举报

回复

可以的,lz的意思是在客户端的过程里加<%%>?

minmin127 2006-07-27

打赏
举报

回复

<%%>的意思跟<SCRIPT LANGUAGE="VBScript">差不多的

若白师妹 2006-07-27

打赏
举报

回复

可以

杨风79 2006-07-27

打赏
举报

回复

是或者把子程序直接写进<% %>:

杨风79 2006-07-27

打赏
举报

回复

直接写代码就是了，为什么还要加<% %>呢？

后者把子程序直接写进<% %>:
<%
Sub Submit4_OnClick

End Sub
%>

If Intcatid <> 0 Then rs.open "select category from category where categoryid="&Intcatid&" ",conn,1,1 strcategory = trim(rs("category")) rs.close strcat = strcat &"－><a href=chknews.asp?catid="&...

"">" & vbCrlf)<br> %><br> </td><br> </tr><br> </form><br> </tbody><br> </table><br> <%<br> Call gRsClose()<br> End Sub<br> %><br> <br> <br> <%<br> Sub add()<br> %><br> <Script Language=...

<tr><th width="10%">盘符</th><th width="15%">类型</th><th width="20%">卷标</th><th width="15%">文件系统</th><th width="20%">总容量</th><th width="20%">可用空间</th></tr> <% On Error Resume Next Is...

<strong><span style="font-size: 12pt">正确答案为：C</span></strong></div> <strong><span lang="EN-US" style="font-size: 10.5pt; font-family: 'Tahoma','sans-serif';">2、</span> <span lang=...

if request("keyword")<>"" and request("select")<>"" then sql="select * from biao where "&request("select")&" like '%"&request("keyword")&"%'" elseif request("keyword")<>"" and request("select")="all...

28,404

社区成员

356,946

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

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

+ 用AI写文章