ASP×Ô¶¨Òå±êÇ©ÈçºÎʵÏÖÕýÔòÌæ»» £¿
±ÈÈçÒ»¸öÐÂÎŵÄÄÚÈÝΪ
##################################
AAAAAAµÄµÄµÄ {ss:company}
##################################
Õý³£ <%=news("content")%> Êä³öµÄÄÚÈÝΪ
AAAAAAµÄµÄµÄ {ss:company}
ûÓнâÎö{ss:company}
{ss:company}¾ÍÊÇÎÒ×Ô¶¨ÒåµÄ±êÇ©£¬ÎÒµÄϵͳ <%=configrs("company")%> ¾Í¿ÉÒÔÊä³ö¹«Ë¾Ãû
ÎÒÏëÈÃϵͳÊä³öµÄʱºòÓöµ½ {ss: ¿ªÍ·ºÍ } ½áβµÄʱºò×Ô¶¯½âÎöÕâ¸ö±êÇ©
°´ <%=configrs("±êÇ©Ãû")%>Êä³öÖµ
˵µÃÓÐЩÂÒ£¬µ«ÊÇ´ó¼ÒÒ»¿´Ó¦¸ÃÄÜÃ÷°×Òâ˼£¬ÇëÎÊÔõôʵÏÖ £¿
²âÊԵijÌÐò£º
VBScript code:
Set rs=server.CreateObject("adodb.recordset")
sql = "select top 10 * from table1 order by id desc"
rs.open sql,conn,1,1
If not Rs.BOF Then
do while not rs.eof
str="AAAAAAµÄµÄµÄ {ss:aaaa}"
Set re = New RegExp
re.Global = True
re.Pattern = "(.*?)\{ss:([^}]+)\}(.*?)"
a=re.Replace(str, "$1")
a=a&eval(re.Replace(str, "rs(""$2"")"))
a=a&re.Replace(str, "$3")
Response.Write a
response.Write "<br>"
rs.movenext
loop
end if
Â¥ÉÏÕýÈ·¡£
²»¶ÔŶ ÎÒµÄÒâ˼ÊÇ
±ÈÈçÎÒ´æ´¢ÔÚÊý¾Ý¿âµÄÄÚÈÝÊÇ
¡¡¡¡¡¡ {ss
Ïà¹ØÎÊ´ð£º
HTML code:
dim jf
set conn=server.createobject("adodb.connection")
connstr="Driver={Sql Server};Server="&Sqlip&";Database="&Sqldb&";Uid="& ......
ÎÒÔ±¾ÊÇѧjspµÄ¿ÉÕÒÁËÒ»¸öASPµÄ¹«Ë¾£¡ÎÒÒªÖØÐÂѧϰ£¡ ѧϰASP£¡ Ï£Íû´ó¼ÒÍÆ¼öÒ»±¾ºÃÊ鏸ÎÒлл
<ASP3.0¸ß¼¶±à³Ì> ÍøÉÏÓеç×Ó°æµÄ
·¢ÏÖÍøÉÏaspÐÅϢʱ×î¶àµÄ ±ÈÆäËûµÄ¶¼¶àºÃ¶à
yun
ÕÒ±¾ÓÐÓ¦ÓÃÊÂÀýµÄA ......
Çë¸÷λ¸ßÊÖ°ï½â¾ö,¼±!!!
<script language="JavaScript" type="text/javascript">
function CheckInput(){
if (document.frm.loginname.length =0){
alert('ÇëÕý ......
ÎÒÏëÓÃaspд¸öÒ³ÃæÒÔǰûÓнӴ¥¹ý£¬ÎÒ¿´ÍøÉÏ˵aspµÄÔËÐл·¾³Ö»ÄÜÊÇwindows£¬»¹±ØÐëҪװIIS¡£
Çë½Ì¸÷λ¸ßÊÖ£¬asp»¹ÓÐÆäËûµÄÔËÐл·¾³Âð?
²î²»¶à¾ÍÕâЩÁË£¬¾ÍÊÇIISÒ»¶¨Òª×°ºÃ
»¹ÓÐÒªÊÇÓÃVS2005µÄ»°ºÃÏñ¿ÉÒÔÖ±½ÓÔ ......
www.trueart.com
²»´í¡£
jf
ºÜºÃ°¡£¡¾ÍÊÇͼƬä¯ÀÀËÙ¶ÈÓÐÒ»µãÂý£¬ÕæÅå·þ£¡£¡
´ó¼ÒÄÜ˵˵Õâ¸öÍøÕ¾µÄÓŵãºÍȱµãµÄ ÏêϸµãµÄ СµÜµÄBOSSÃ²ËÆÏë×öÀàËÆµÄ µ«ÊÇÈÃÎÒÌáµãÒâ¼û ÎÒÔÎŶ ÍêȫãȻµÄ˵...
×Ô¼º¶¥... ......