㈠ 如何把asp代码转换成可用js调用的代码
<!--#include file="mdb.asp"-->
<link type="text/css" rel="stylesheet" href="css/senlon_3.css" />
<link id="skintheme" href="css/senlon_4.css" type="text/css" rel="stylesheet" />
<%
set rsDe=server.createobject("adodb.recordset")
sql= "select * from detail Where verity=1 order by senlon_intime desc"
rsDe.open sql,conn,1,1
dim str : str="<table width=100% border=0 align='center' cellpadding=2 cellspacing=2>"
n=1
While Not rsDe.Eof and n<55
str=str&"<tr><td height=22><a href='"&rsDe("url")&"' title=近十分钟来路:"&rsDe("senlon_10in")&"次|今天来路:"&rsDe("senlon_dayin")&"次 target='_blank'>"
if rsDe("senlon_dayin")>29 then
str=str&"<b>"
str=str&rsDe("title")
if rsDe("senlon_dayin")>29 then
str=str&"</b>"
str=str&"</a></td>"
if n mod 9 =0 then
str=str&"</Tr>"
end if
rsDe.MoveNext
n=n+1
Wend
rsDe.close
set rsDe=nothing
str=str&"</table>"
response.write "document.write ("&str&")"
%>
㈡ 请问如何将此JS嵌套入ASP程序里
网站代来码里加入源js代码那是常有的事。
<%
'aspcode
response.write'<script>'jscode'</script>'
'aspcode
%>
注意好js的格式如果多行,有些可能需要用到chr(13)来强制换行。
㈢ 用JS导入ASP代码怎么弄
<INPUT class='btn' onclick=javascript:window.open('list.asp?id=<%=rs("articleid")%>','research','') type='button' value='查看' id='button1' name='button1' />
㈣ 下载了一个JS图表程序,问下怎么把js里的图表数据转化为我们循环出来的asp代码数据
我只知道,如果用的mvc的话,将这个json做为参数使用ajax传到后台后,只要在参数处写上相回应的参数名就可以答自己识别了。首先构造一个相应的实体类,如Serier,里面包含title等4个相同名称的参数。然后在controller的参数中写上ILIst<Serier> series。在ajax提交后,就自动解析了。
另外,也可以上网上找个JSON解析的类,然后将这个JSON解析为对象,然后处理一下也可以的。
㈤ html页面js调用asp
<!-- #include file = "conn.asp" -->
<!--
document.write("<div class=\"h_box\"><ul>");
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from new order by id desc"
rs.open sql,conn,1,1
%>
<%
pagesum=8
topage=clng(request("topage"))
if topage<1 then topage=1
rs.pagesize=pagesum
if not rs.eof then
rs.absolutepage=topage
end if
no=1
%>
<% do while not rs.eof and not rs.bof and pagesum>0 %>
doument.write("<li>·<%=rs("name")%></li>");
<% rs.movenext %>
<% pagesum=pagesum-1 %>
<% no=no+1 %>
<% loop %>
doument.write("</ul>/div>");
//-->
什么啊,直接写上就行了,js可以调用任何类型的文件,只要语法安装js写就行
比如:<script language="javascript" src="index.html"></script>
你只要在index.html里的代码用js的形式写就行了!
㈥ 制作网页的时候把html文件转成asp文件怎么转
你的意思是将 ASP 代码 生成静态,让客户端访问?
例子
<%
'使用方法:
' dim UTH,HtmlDate
' set UTH=new URLtoHtml 创建对象
' UTH.URL="http://……" 获取要处理的URL
' HtmlDate=UTH.HttpDate 取得处理后的网页数据
' ....... 中间处理代码
' set UTH=nothing 删除实例对象
'**************************
class URLtoHtml
private c_url
public property let URL(x_url)
c_url = x_url
end property
private function GetURL(url)
set Retrieval = CreateObject("Microsoft.XMLHTTP")
with Retrieval
.Open "GET", url, false
.Send
GetURL = .responsebody
end with
set Retrieval = nothing
end function
private function Bytes2bStr2(url)
dim BytesStream,StringReturn,vin,adTypeText
adTypeText=2
vin=GetURL(url)
set BytesStream = Server.CreateObject("ADODB.Stream")
with BytesStream
.Type = adTypeText
.Open
.WriteText vin
.Position = 0
.Charset = "GB2312"
.Position = 2
StringReturn = .ReadText
.close
end with
Set BytesStream = nothing
Bytes2bStr2 = StringReturn
end function
public property get HttpDate
HttpDate=Bytes2bStr2(c_url)
end property
end class
%>
'////////////////////////////////////////////一下是代码的调用
<%
dim UTH,fso,fout,HttpDate
set UTH=new URLtoHtml
UTH.URL="http://"&Request.ServerVariables("SERVER_NAME")&":"&Request.ServerVariables("SERVER_PORT")&"/1.asp"
'/////////////////////////////////////////////////////1.asp是测试页面的名称
HttpDate=UTH.HttpDate
set fso = Server.CreateObject("Scripting.FileSystemObject")
set fout=fso.CreateTextFile(Server.MapPath("/Index.htm"))
fout.WriteLine HttpDate
set UTH=nothing
%>
<%
if err.number>0 then
response.Write "生成网站首页失败!"
else
response.Write "生成网站首页成功!"
end if
%>
工具:
飞鸟asp生成htm插件1.4
㈦ js代码转为asp,急需
你直接放在<%%>中就可以用了。
Response.Write "function m(s){" & vbCrlf
Response.Write " var c,n,z,i;" & vbCrlf
Response.Write " z="""";" & vbCrlf
Response.Write " i=0;" & vbCrlf
Response.Write " while(i<s.length){" & vbCrlf
Response.Write " c=s.charAt(i);" & vbCrlf
Response.Write " if(""u""==c){" & vbCrlf
Response.Write " c=""%""+c;" & vbCrlf
Response.Write " c+=s.charAt(i+1);" & vbCrlf
Response.Write " c+=s.charAt(i+2);" & vbCrlf
Response.Write " c+=s.charAt(i+3);" & vbCrlf
Response.Write " c+=s.charAt(i+4);" & vbCrlf
Response.Write " n=5;" & vbCrlf
Response.Write " }else {" & vbCrlf
Response.Write " c=""%""+c;" & vbCrlf
Response.Write " c+=s.charAt(i+1);" & vbCrlf
Response.Write " n=2;" & vbCrlf
Response.Write " }" & vbCrlf
Response.Write " z+=c;" & vbCrlf
Response.Write " i=i+n;" & vbCrlf
Response.Write " }" & vbCrlf
Response.Write " return z;" & vbCrlf
Response.Write "function d(os){" & vbCrlf
Response.Write " var key=""DecryptIT"";" & vbCrlf
Response.Write " var ds;" & vbCrlf
Response.Write " ds="""";" & vbCrlf
Response.Write " var kp,sp,s,kc,sc;" & vbCrlf
Response.Write " kp=0;" & vbCrlf
Response.Write " sp=0;" & vbCrlf
Response.Write " while(sp<os.length){" & vbCrlf
Response.Write " sc=os.charCodeAt(sp);" & vbCrlf
Response.Write " kc=key.charCodeAt(kp);" & vbCrlf
Response.Write " if(((sc^kc)==39)||((sc^kc)==92)||((sc^kc)<32)||((sc^kc)>126)){" & vbCrlf
Response.Write " s=String.fromCharCode(sc);" & vbCrlf
Response.Write " }else {" & vbCrlf
Response.Write " s=String.fromCharCode((sc^kc));" & vbCrlf
Response.Write " }" & vbCrlf
Response.Write " ds+=s;" & vbCrlf
Response.Write " kp++;" & vbCrlf
Response.Write " sp++;" & vbCrlf
Response.Write " if(kp>=key.length){" & vbCrlf
Response.Write " kp=0;" & vbCrlf
Response.Write " }" & vbCrlf
Response.Write " }" & vbCrlf
Response.Write " return ds;" & vbCrlf
Response.Write "}" & vbCrlf
㈧ 求一套前端开发在线工具箱源码,比如在线HTML转JS等。
你好,请下面的链接里,安装下浏览器扩展,在扩展文件中就能找到源码。
网页链接
若有帮助,请采纳,谢谢
㈨ js 代码转化成ASP代码
javascript运行在客户端,而运行在服务器端
要想asp接受到javascript中的变量,就的把javascript中的变量提交到asp中
方法比较多,下面是一个比较简单的方法
修改你原来的javascript
<a href="javascript:extractlinks()">点击测试下含有的链接?</a>
<script language="JavaScript1.2" defer="defer" >
<!--
function extractlinks(){
var links=document.all.tags("A")
var strlinks='';
b=0
var total=links.length
var win2=window.open("","","menubar,scrollbars,toolbar")
for (i=0;i<total;i++)
{
if ((links[i].href).indexOf("www")!=-1&
(links[i].href.length )<35) {
//win2.document.write("<font size='2'>"+links[i]+"</font><br>");
strlinks += links[i]+'|';
b++;
}
}
//win2.document.write("<font size='2'>一共有"+b+"个外部连接</font><br>")
win2.location.href='view.asp?link='+strlinks;
}
-->
</script>
新建一个view.asp
<%
link = Request.QueryString("link")
links =split(link,"|",-1,1)
for each str in links
Response.Write(str+"<br>")
next
%>
你就可以把就要把javascript中的变量提交到asp中
你还用现在流行的ajax把javascript中的变量提交到asp中
㈩ 怎么在chrome调试工具直接修改js代码
1、在元素标签上右键审查元素。