3.ÄÚ¹¦Ìâ
¡¡¡¡ÊÔÌâ1£º·Ö±ð¸ø³öBOOL£¬int£¬float£¬Ö¸Õë±äÁ¿ Óë“ÁãÖµ”±È½ÏµÄ if Óï¾ä£¨¼ÙÉè±äÁ¿ÃûΪvar£©
¡¡¡¡½â´ð£º
¡¡¡¡¡¡BOOLÐͱäÁ¿£ºif(!var)
¡¡¡¡¡¡intÐͱäÁ¿£º if(var==0)
¡¡¡¡¡¡floatÐͱäÁ¿£º
¡¡¡¡¡¡const float EPSINON = 0.00001;
¡¡¡¡¡¡if ((x >= - EPSINON) && (x <= EPSINON)
¡¡¡¡¡¡Ö¸Õë±äÁ¿£º¡¡¡¡if(var==NULL)
¡¡¡¡ÆÊÎö£º
¡¡¡¡¿¼²é¶Ô0ÖµÅжϵēÄÚ¹¦”£¬BOOLÐͱäÁ¿µÄ0ÅжÏÍêÈ«¿ÉÒÔд³Éif(var==0)£¬¶øintÐͱäÁ¿Ò²¿ÉÒÔд³Éif(!var)£¬Ö¸Õë±äÁ¿µÄÅжÏÒ²¿ÉÒÔд³Éif(!var)£¬ÉÏÊöд·¨ËäÈ»³ÌÐò¶¼ÄÜÕýÈ·ÔËÐУ¬µ«ÊÇδÄÜÇåÎúµØ±í´ï³ÌÐòµÄÒâ˼¡£
¡¡¡¡Ò»°ãµÄ£¬Èç¹ûÏëÈÃifÅжÏÒ»¸ö±äÁ¿µÄ“Õæ”¡¢“¼Ù”£¬Ó¦Ö±½ÓʹÓÃif(var)¡¢if(!var)£¬±íÃ÷ÆäΪ“Âß¼”Åжϣ»Èç¹ûÓÃifÅжÏÒ»¸öÊýÖµÐͱäÁ¿(short¡¢int¡¢longµÈ)£¬Ó¦¸ÃÓÃif(var==0)£¬±íÃ÷ÊÇÓë0½øÐГÊýÖµ”ÉϵıȽϣ»¶øÅжÏÖ¸ÕëÔòÊÊÒËÓÃif(var==NULL)£¬ÕâÊÇÒ»Öֺܺõıà³Ìϰ¹ß¡£
¡¡¡¡¸¡µãÐͱäÁ¿²¢²»¾«È·£¬ËùÒÔ²»¿É½«float±äÁ¿ÓÓ==”»ò“£¡=”ÓëÊý×ֱȽϣ¬Ó¦¸ÃÉ跨ת»¯³É“>=”»ò“<=&r ......
3.ÄÚ¹¦Ìâ
¡¡¡¡ÊÔÌâ1£º·Ö±ð¸ø³öBOOL£¬int£¬float£¬Ö¸Õë±äÁ¿ Óë“ÁãÖµ”±È½ÏµÄ if Óï¾ä£¨¼ÙÉè±äÁ¿ÃûΪvar£©
¡¡¡¡½â´ð£º
¡¡¡¡¡¡BOOLÐͱäÁ¿£ºif(!var)
¡¡¡¡¡¡intÐͱäÁ¿£º if(var==0)
¡¡¡¡¡¡floatÐͱäÁ¿£º
¡¡¡¡¡¡const float EPSINON = 0.00001;
¡¡¡¡¡¡if ((x >= - EPSINON) && (x <= EPSINON)
¡¡¡¡¡¡Ö¸Õë±äÁ¿£º¡¡¡¡if(var==NULL)
¡¡¡¡ÆÊÎö£º
¡¡¡¡¿¼²é¶Ô0ÖµÅжϵēÄÚ¹¦”£¬BOOLÐͱäÁ¿µÄ0ÅжÏÍêÈ«¿ÉÒÔд³Éif(var==0)£¬¶øintÐͱäÁ¿Ò²¿ÉÒÔд³Éif(!var)£¬Ö¸Õë±äÁ¿µÄÅжÏÒ²¿ÉÒÔд³Éif(!var)£¬ÉÏÊöд·¨ËäÈ»³ÌÐò¶¼ÄÜÕýÈ·ÔËÐУ¬µ«ÊÇδÄÜÇåÎúµØ±í´ï³ÌÐòµÄÒâ˼¡£
¡¡¡¡Ò»°ãµÄ£¬Èç¹ûÏëÈÃifÅжÏÒ»¸ö±äÁ¿µÄ“Õæ”¡¢“¼Ù”£¬Ó¦Ö±½ÓʹÓÃif(var)¡¢if(!var)£¬±íÃ÷ÆäΪ“Âß¼”Åжϣ»Èç¹ûÓÃifÅжÏÒ»¸öÊýÖµÐͱäÁ¿(short¡¢int¡¢longµÈ)£¬Ó¦¸ÃÓÃif(var==0)£¬±íÃ÷ÊÇÓë0½øÐГÊýÖµ”ÉϵıȽϣ»¶øÅжÏÖ¸ÕëÔòÊÊÒËÓÃif(var==NULL)£¬ÕâÊÇÒ»Öֺܺõıà³Ìϰ¹ß¡£
¡¡¡¡¸¡µãÐͱäÁ¿²¢²»¾«È·£¬ËùÒÔ²»¿É½«float±äÁ¿ÓÓ==”»ò“£¡=”ÓëÊý×ֱȽϣ¬Ó¦¸ÃÉ跨ת»¯³É“>=”»ò“<=&r ......
Ëæ ×ÅÍøÕ¾·ÃÎÊÁ¿µÄ¼Ó´ó£¬Ã¿´Î´ÓÊý¾Ý¿â¶ÁÈ¡¶¼ÊÇÒÔЧÂÊ×÷Ϊ´ú¼ÛµÄ£¬ºÜ¶àÓÃACCESS×÷Êý¾Ý¿âµÄ¸ü»áÉîÓÐÌå»á£¬¾²Ì¬Ò³¼ÓÔÚËÑË÷ʱ£¬Ò²»á±»ÓÅÏÈ¿¼ÂÇ¡£»¥ÁªÍøÉÏÁ÷ ÐеÄ×ö·¨Êǽ«Êý¾ÝÔ´´úÂëдÈëÊý¾Ý¿âÔÙ´ÓÊý¾Ý¿â¶ÁÈ¡Éú³É¾²Ì¬Ã棬ÕâÑùÎÞÐμä¾Í¼Ó´óÁËÊý¾Ý¿â¡£½«ÏÖÓеÄASPÒ³Ö±½ÓÉú³É¾²Ì¬Ò³£¬½«»á½ÚÊ¡ºÜ¶à¡£
ÏÂÃæµÄÀý×ÓÊǽ«¡¢index.asp?id=1/index.asp?id=2/index.asp?id=3/ÕâÈý¸ö¶¯Ì¬Ò³Ã棬·Ö±ðÉú³Éndex1.htm,index2.htm,index3.htm´æÔÚ¸ùĿ¼ÏÂÃæ£º
<%
dim strUrl,Item_Classid,id,FileName,FilePath,Do_Url,Html_Temp
Html_Temp="<UL>"
For i=1 To 3
Html_Temp = Html_Temp"<LI>"
Item_Classid = i
FileName = "Index"&Item_Classid".htm"
FilePath = Server.MapPath("/")"\"
Html_Temp = Html_Temp&FilePath"</LI>"
Do_Url = "http://"
Do_Url = Do_Url&Request.ServerVariables("SERVER_NAME")"/main/index.asp"
Do_Url = Do_Url"?Item_Classid="&Item_Classid
strUrl = Do_Url
dim objXmlHttp
set objXmlHttp = Server.CreateObject("Microsoft.XMLHTTP")
objXmlHttp.open "GET",strUrl,false
objXmlHttp.send()
Dim binFile ......
Ëæ ×ÅÍøÕ¾·ÃÎÊÁ¿µÄ¼Ó´ó£¬Ã¿´Î´ÓÊý¾Ý¿â¶ÁÈ¡¶¼ÊÇÒÔЧÂÊ×÷Ϊ´ú¼ÛµÄ£¬ºÜ¶àÓÃACCESS×÷Êý¾Ý¿âµÄ¸ü»áÉîÓÐÌå»á£¬¾²Ì¬Ò³¼ÓÔÚËÑË÷ʱ£¬Ò²»á±»ÓÅÏÈ¿¼ÂÇ¡£»¥ÁªÍøÉÏÁ÷ ÐеÄ×ö·¨Êǽ«Êý¾ÝÔ´´úÂëдÈëÊý¾Ý¿âÔÙ´ÓÊý¾Ý¿â¶ÁÈ¡Éú³É¾²Ì¬Ã棬ÕâÑùÎÞÐμä¾Í¼Ó´óÁËÊý¾Ý¿â¡£½«ÏÖÓеÄASPÒ³Ö±½ÓÉú³É¾²Ì¬Ò³£¬½«»á½ÚÊ¡ºÜ¶à¡£
ÏÂÃæµÄÀý×ÓÊǽ«¡¢index.asp?id=1/index.asp?id=2/index.asp?id=3/ÕâÈý¸ö¶¯Ì¬Ò³Ã棬·Ö±ðÉú³Éndex1.htm,index2.htm,index3.htm´æÔÚ¸ùĿ¼ÏÂÃæ£º
<%
dim strUrl,Item_Classid,id,FileName,FilePath,Do_Url,Html_Temp
Html_Temp="<UL>"
For i=1 To 3
Html_Temp = Html_Temp"<LI>"
Item_Classid = i
FileName = "Index"&Item_Classid".htm"
FilePath = Server.MapPath("/")"\"
Html_Temp = Html_Temp&FilePath"</LI>"
Do_Url = "http://"
Do_Url = Do_Url&Request.ServerVariables("SERVER_NAME")"/main/index.asp"
Do_Url = Do_Url"?Item_Classid="&Item_Classid
strUrl = Do_Url
dim objXmlHttp
set objXmlHttp = Server.CreateObject("Microsoft.XMLHTTP")
objXmlHttp.open "GET",strUrl,false
objXmlHttp.send()
Dim binFile ......
Ëæ ×ÅÍøÕ¾·ÃÎÊÁ¿µÄ¼Ó´ó£¬Ã¿´Î´ÓÊý¾Ý¿â¶ÁÈ¡¶¼ÊÇÒÔЧÂÊ×÷Ϊ´ú¼ÛµÄ£¬ºÜ¶àÓÃACCESS×÷Êý¾Ý¿âµÄ¸ü»áÉîÓÐÌå»á£¬¾²Ì¬Ò³¼ÓÔÚËÑË÷ʱ£¬Ò²»á±»ÓÅÏÈ¿¼ÂÇ¡£»¥ÁªÍøÉÏÁ÷ ÐеÄ×ö·¨Êǽ«Êý¾ÝÔ´´úÂëдÈëÊý¾Ý¿âÔÙ´ÓÊý¾Ý¿â¶ÁÈ¡Éú³É¾²Ì¬Ã棬ÕâÑùÎÞÐμä¾Í¼Ó´óÁËÊý¾Ý¿â¡£½«ÏÖÓеÄASPÒ³Ö±½ÓÉú³É¾²Ì¬Ò³£¬½«»á½ÚÊ¡ºÜ¶à¡£
ÏÂÃæµÄÀý×ÓÊǽ«¡¢index.asp?id=1/index.asp?id=2/index.asp?id=3/ÕâÈý¸ö¶¯Ì¬Ò³Ã棬·Ö±ðÉú³Éndex1.htm,index2.htm,index3.htm´æÔÚ¸ùĿ¼ÏÂÃæ£º
<%
dim strUrl,Item_Classid,id,FileName,FilePath,Do_Url,Html_Temp
Html_Temp="<UL>"
For i=1 To 3
Html_Temp = Html_Temp"<LI>"
Item_Classid = i
FileName = "Index"&Item_Classid".htm"
FilePath = Server.MapPath("/")"\"
Html_Temp = Html_Temp&FilePath"</LI>"
Do_Url = "http://"
Do_Url = Do_Url&Request.ServerVariables("SERVER_NAME")"/main/index.asp"
Do_Url = Do_Url"?Item_Classid="&Item_Classid
strUrl = Do_Url
dim objXmlHttp
set objXmlHttp = Server.CreateObject("Microsoft.XMLHTTP")
objXmlHttp.open "GET",strUrl,false
objXmlHttp.send()
Dim binFile ......
<!--#include file="conn.asp"-->
<!--#include file="inc/head.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="zh-cn" lang="zh-cn" xmlns:qz="http://qzone.qq.com/">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta http-equiv="Content-Language" content="gb2312" />
<title>²âÊÔ</title>
</head>
<body style="margin:10px;">
<form action="" method="post">
<textarea name=sql rows=5 style="width:100%" onkeypress="if(event.keyCode==10)submit.click()"><%=request("sql")%></textarea><BR>
<input type=submit id=submit style="width:20%" >
<input type=input name=pass style="width:75%" value="<%=request("pass")%>">
</form>
<%
function tip(text)
response.write(text)
end fun ......
ASPÓë´æ´¢¹ý³Ì
ASPÓë´æ´¢¹ý³Ì(Stored Procedures)µÄÎÄÕ²»ÉÙ£¬µ«ÊÇÎÒ»³ÒÉ×÷ÕßÃÇÊÇ·ñÕæÕýʵ¼ù¹ý¡£ÎÒÔÚ³õѧʱ²éÔĹý´óÁ¿Ïà¹Ø×ÊÁÏ£¬·¢ÏÖÆäÖÐÌṩµÄºÜ¶à·½·¨Êµ¼Ê²Ù×÷ÆðÀ´²¢²»ÊÇÄÇô»ØÊ¡£¶ÔÓÚ¼òµ¥µÄÓ¦Óã¬ÕâЩ×ÊÁÏÒ²ÐíÊÇÓаïÖúµÄ£¬µ«½öÏÞÓÚ´Ë£¬ÒòΪËüÃǸù±¾¾ÍÊÇǧƪһÂÉ£¬»¥Ïà³Ï®£¬ÉÔ΢¸´ÔÓµãµÄÓ¦Ó㬾ÍÈ«¶¼ÓïÑɲ»ÏêÁË¡£
ÏÖÔÚ£¬ÎÒ»ù±¾ÉÏͨ¹ýµ÷Óô洢¹ý³Ì·ÃÎÊSQL Server£¬ÒÔϵÄÎÄ×ÖËä²»¸Ò±£Ö¤¾ø¶ÔÕýÈ·£¬µ«¶¼ÊÇʵ¼ùµÄ×ܽᣬϣÍû¶Ô´ó¼ÒÄÜÓаïÖú¡£
´æ´¢¹ý³Ì¾ÍÊÇ×÷Ϊ¿ÉÖ´ÐжÔÏó´æ·ÅÔÚÊý¾Ý¿âÖеÄÒ»¸ö»ò¶à¸öSQLÃüÁî¡£
¶¨Òå×ÜÊǺܳéÏó¡£´æ´¢¹ý³ÌÆäʵ¾ÍÊÇÄÜÍê³ÉÒ»¶¨²Ù×÷µÄÒ»×éSQLÓï¾ä£¬Ö»²»¹ýÕâ×éÓï¾äÊÇ·ÅÔÚÊý¾Ý¿âÖеÄ(ÕâÀïÎÒÃÇ̸ֻSQL Server)¡£Èç¹ûÎÒÃÇͨ¹ý´´½¨´æ´¢¹ý³ÌÒÔ¼°ÔÚASPÖе÷Óô洢¹ý³Ì£¬¾Í¿ÉÒÔ±ÜÃ⽫SQLÓï¾äͬASP´úÂë»ìÔÓÔÚÒ»Æð¡£ÕâÑù×öµÄºÃ´¦ÖÁÉÙÓÐÈý¸ö£º
µÚÒ»¡¢´ó´óÌá¸ßЧÂÊ¡£´æ´¢¹ý³Ì±¾ÉíµÄÖ´ÐÐËٶȷdz£¿ì£¬¶øÇÒ£¬µ÷Óô洢¹ý³Ì¿ÉÒÔ´ó´ó¼õÉÙͬÊý¾Ý¿âµÄ½»»¥´ÎÊý¡£
µÚ¶þ¡¢Ìá¸ß°²È«ÐÔ¡£¼ÙÈ罫SQLÓï¾ä»ìºÏÔÚASP´úÂëÖУ ......
ASP³ÌÐòÖÐÈç¹ûÐèҪѹËõ´¦ÀíÎļþ.»úÆ÷ÉϱØÐë°²×°WinRAR³ÌÐò.
ͬʱÐèÒª¼Çϰ²×°Ä¿Â¼
ÒÔÏÂÊÇÒ»¶ÎѹËõÎļþµÄ´úÂëʾÀý:
on error resume next
Dim strRarName,strWinRarPath,rarPath,cmdStr
strRarName = "É豸̨ÕÊ"
strWinRarPath = "C:\Progra~1\WinRAR"
rarPath = server.MapPath("/")
Set WshShell = server.CreateObject("Wscript.Shell")
cmdStr = strWinRarPath & "\winrar a -o+ -inul -ibck -ep " & rarPath & "\" & strRarName & " " & rarPath & "\sbtz.mdb"
WshShell.Run (cmdStr,1,true)
ÆäÖÐ strRarName ÊÇÉú³ÉµÄrarÎļþÃû³Æ
strWinRarPath ÊÇWinRAR³ÌÐòµÄ°²×°Ä¿Â¼
rarPath ÊdzÌÐòÐéÄâĿ¼µÄ·¾¶
cmdStr ÊÇWinRARÃüÁîÐеÄÄÚÈÝ
³ÌÐò´úÂëÖеĹؼüÖ®´¦¾ÍÊÇÓÃServer.CreateObject("Wscript.Shell")À´Ö´ÐÐCMD.EXE£¬CMD.EXEÔËÐÐRAR.EXEͨ¹ýWINRARµÄÃüÁîÀ´Ö´ÐнâѹËõÎļþÓëѹËõÎļþµÄ
ÏÂÃæµÄ½âѹËõÎļþµÄ´úÂëʾÀý:
<%
'mainÎļþ¼ÐÖаüº¬cmd.exe rar.exe Òª½âѹËõµÄÎļþ£ ......
µÚÒ»£º
private void Button1_Click( object sender, System.EventArgs e ) { Response.Redirect( Request.Url.ToString( ) ); } µÚ¶þ£º
private void Button2_Click( object sender, System.EventArgs e ) { Response.Write( " < script language=javascript>window.location.href=document.URL; < /script>" ); } µÚÈý£º
private void Button3_Click( object sender, System.EventArgs e ) { Response.AddHeader( "Refresh","0" ); } µÚËÄ£º
private void Button6_Click( object sender, System.EventArgs e ) { //ºÃÏñÓÐЩ²»¶Ô£¿ //Response.Write( " < script language=javascript>window.location.reload( ); < /script>" ); } µÚÎ壺
< script>< !-- var limit="3:00" if ( document.images ) { var parselimit=limit.split( ":" )parselimit=parselimit[0]*60+parselimit[1]*1 } function beginrefresh( ) { if ( !document.images )returnif ( parselimit==1 )window.location.reload( )else { parselimit-=1curmin=Math.floor( parselimit/60 )cursec=parselimit%60if ( curmin!=0 )curtime=curmin+"·Ö"+cursec+"ÃëºóÖØË ......