Viele Internetnutzer fragten, wie man ein JS News Call -Programm erstellt, und jetzt werden sie zu Ihrer Referenz veröffentlicht:
JS -Anrufprogramm:
List2.asp
Quellcode: --------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
<!-#includeFile = "conn.asp"->
<%
DiMRs, SQL
Dimspecid 'Ressourcenfunktion ID
SpecID = clng (Request ("Specid"))
SQL = "SELECTTOP10ID, TITEL, FILEPATHFROMVIEW_NEWINFOWHEREINSTR (','+Specity+','," & Specid & ", ') <> 0OrderByIdDesc"
Setrs = conn.execute (SQL)
Whilenotrs.eof
Response.write "document.write (" "<ahref = '/tsys/newsfiles/" & rs ("filepath") & "' target = '_ leer'>" & rs ("title") & "</a> <br/>" ")" & vbcrlf
Rs.Movenext
Wend
Rs.close
Setrs = nichts
%>
----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
Aufrufmethode:
Quellcode: --------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
<scriptSrc = "list2.asp? SpecID = 13"> </script>
----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
Lassen Sie es mich erklären ..... das obige ist TSYS1.0 ...
Unten finden Sie die erweiterte Version von TSYS1.1 von mir geschrieben.
<!-#includeFile = "include/config.asp"->
<%
DiMRs, SQL
Dimspecid 'Ressourcenfunktion ID
SpecID = clng (Request ("Specid"))
Dimconn
SetConn = server.createObject ("adodb.Connection")
Conn.openconnstr
SQL = "SELECTTOP10ID, TITEL, FILEPATHFROMVIEW_NEWINFOWHEREINSTR (','+Specity+','," & Specid & ", ') <> 0OrderByIdDesc"
Setrs = conn.execute (SQL)
Whilenotrs.eof
Response.write "document.write (" "<aHref = '" & rs ("filepath") & "' target = '_ leer'>" & rs ("title") & "</a> <br/>" ")" & vbcrlf
Rs.Movenext
Wend
Rs.close
Setrs = nichts
conn.close
setConn = nichts
%>
Jeder sollte wissen, wo Sie es speichern können, wenn Sie sich ansehen, include/config.asp ...
Sie können die Demo sehen:
http://31u.net/html/zhuanti/daima005.htm
Der Anruf sind die empfohlenen Informationen auf der Startseite von www.31u.net ... Die Funktion ist 35 ..
Natürlich können Sie eine JS-Nachrichtenliste für Untersäulen basierend darauf schreiben ... from31u.com