大哥,小弟有难,求助!!!!!!!! 关于新云网站管理系统,我用<script src="article/js/specialmenu.js" type="text/javascript"></script>在首页调用专题,请问如何让专题标题成两列。(因为它本来只有一列) 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 你把specialmenu.js贴出来,谁知道怎么改啊 Dim strFilePath 'strTemp = Left(strTemp, InstrRev(strTemp, "<br>", -1, 1) - 1) strContext = strTemp '生成专题菜单的JS文件路径 strFilePath = Newasp.InstallDir & Newasp.ChannelDir & "js/specialmenu.js" Newasp.CreatedTextFile strFilePath, strContext strContext = Replace(strTemp, "<br>", " ┇ ",1,-1,1) strContext = Replace(strContext, "· ", "") strFilePath = Newasp.InstallDir & Newasp.ChannelDir & "js/specmenu.js" Newasp.CreatedTextFile strFilePath, strContext If Request("stype") = 2 Then OutputScript "创建专题菜单的JS文件成功!" ,"?ChannelID=" & ChannelID End If Exit SubEnd Sub 一个关于JS获取元素标签id的问题,高分求教 滚动图片为什么只滚动一轮 使用js时在ie8中碰到的问题 各位老师好!我是一位新手.现有一问题想请老师帮忙解答一下!! AJAX调用得到html 连接失效 问题? 请问select表单里的value值怎么转换成text? js实现动态飘窗问题,各位大神帮忙解决一下!!!!!!!!!!! 增加一行UL,怎么让它产生序号?并且这里删除事件怎么写? IE6下,如何让页面打印后,自动关闭 ligerDialog.open弹出框IE7下面不兼容,不能弹出窗口,火狐,IE9都可以 CheckBox选中时如何切换不同的页面内容? Radio问题,请大家帮忙看看
'strTemp = Left(strTemp, InstrRev(strTemp, "<br>", -1, 1) - 1)
strContext = strTemp
'生成专题菜单的JS文件路径
strFilePath = Newasp.InstallDir & Newasp.ChannelDir & "js/specialmenu.js"
Newasp.CreatedTextFile strFilePath, strContext
strContext = Replace(strTemp, "<br>", " ┇ ",1,-1,1)
strContext = Replace(strContext, "· ", "")
strFilePath = Newasp.InstallDir & Newasp.ChannelDir & "js/specmenu.js"
Newasp.CreatedTextFile strFilePath, strContext
If Request("stype") = 2 Then
OutputScript "创建专题菜单的JS文件成功!" ,"?ChannelID=" & ChannelID
End If
Exit Sub
End Sub