㈠ 如何把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、在元素標簽上右鍵審查元素。