ASPÖÐÊ®´ó³£ÓóÌÐò´úÂë.£ºµÚ¶þ½Ú¡´ÎÒµÄÐĵáµ
ÓÃASPÖÆ×÷ÕÅÑï¸öÐԵĵ÷²éϵͳ(1)
¡¡¡¡Ëæ×ÅÍøÂçµÄÆÕ¼°£¬ÍøÉϵ÷²éÍùÍùÄÜ´ïµ½½ÏºÃµÄЧ¹û¡£ÔÚ×Ô¼ºµÄ¸öÈËÕ¾µãÉÏ·ÅÒ»¸öȤζÎÊÌâµ÷²é°å£¬×ÅʵÄÜÎªÍøÕ¾ÌíÉ«²»ÉÙ£»¿öÇÒͨ¹ýµ÷²é½á¹ûÄãÄܸü¶à¸ü׼ȷÁ˽âÍøÓѶÔ×Ô¼ºÕ¾µãµÄ¿´·¨¡£×÷ΪWebmaster£¬Èç¹ûÄãµÄÍøÕ¾Ò²ÐèÒª¾Íij¸öÖ÷Ìâ½øÐе÷²é£¬¶øÄãÓÖÌÖÑáʹÓñðÈËÃâ·ÑÌṩµÄµ÷²é°å£¨Ãâ·ÑÍùÍùÊÇÒª¸¶³ö´ú¼ÛµÄ£¬±ÈÈç´ò¹ã¸æ£¡£©£¬ÄÇôÎÒ½¨ÒéÄ㻨ʮ¼¸·ÖÖÓʱ¼ä¿´ÍêÕâÆª½éÉÜÓÃASPÖÆ×÷µ÷²é°åµÄÎÄÕ¡£ÄãÖ»Òª°ÑÎÄÖеĴúÂëCopyµ½ÄãµÄ»ú×ÓÉÏ£¬ÉÔ×öÐ޸ģ¬ÄãÁ¢¼´¾ÍÓµÓÐÒ»¸öÊôÓÚÄã×Ô¼ºµÄ¸öÐÔ»¯µ÷²é°å¡£ºÃÁË£¬´òÆð¾«ÉñÍùÏ¿´°É¡£
¡¡¡¡±¾µ÷²é°å¹²ÓÐÈý¸öÎļþ£ºÏÔʾµ÷²éÎÊÌâ(research.html)¡¢´¦ÀíÓû§Ñ¡Ôñ(select.asp)¡¢ä¯ÀÀµ÷²é½á¹û(viewresult.asp)¡£Éè¼ÆË¼Â·Îª£ºASPÈ¡µÃÓÉ±íµ¥·¢À´µÄÐÅÏ¢£¬²¢¾Ý´ËÐ޸ļǼµ÷²éµÃƱÊýµÄÊý¾Ý¿â£¬È»ºóASP¶ÁÈ¡Êý¾Ý¿â£¬»ñµÃ¸÷¸öµ÷²éÎÊÌâµÄµÃƱÊýÄ¿£¬Í¨¹ýµÃƱÊý¶àÉÙÀ´µ÷½Ú¶ÔÓ¦ÌõÐÎͼÏÔʾµÄ¿íÀ´Ö±¹Û±ÈÀýµØ¸ø³öµ÷²é½á¹û¡£ÔÚ³ÌÐòµÄ¹Ø¼ü´¦£¬ÎÒ¶¼¸ø³öÁ˽ÏΪÏêϸµÄ×¢ÊÍ£¬ÕâÀï¾Í²»ÔÙ½²ÊöASPµÄ»ù±¾ÖªÊ¶¡£¶ÁÕß¿ÉÒÔµ½ÌÕ°ÉASPרÀ¸²éÔÄ¡£µ±È»£¬ÎÒÏ£ÍûÄãÔÚ×Ô¼ºµÄ·þÎñÆ÷Éϵ÷ÊÔ³ÌÐòʱ£¬Óв»¶®µÄµØ·½£¬»¹ÊDzé²éÉí±ßµÄASP¼¼ÊõÊֲᣬ¿´¿´¶ÔÏó¡¢·½·¨»òº¯ÊýµÄÏêϸÓï·¨ÊÔ×ÅÐ޸ģ¬¿´¿´½á¹ûÈçºÎ±ä»¯——Õâ¿ÉÊÇѧϰ±à³ÌµÄÒ»¸öºÃ·½·¨ÄØ¡£
¡¡¡¡Ò»¡¢ÏÔʾµ÷²éÎÊÌâ(research.html)
¡¡¡¡µ÷²éÎÊÌâµÄÉè¼ÆÒªÒÀ¾Ýʵ¼ÊÇé¿ö£¬»ò½²¾¿ÊµÓÃÐÔ»ò½²¾¿È¤Î¶ÐÔ£¬ÔÚÍøÒ³ÉÏÏÔʾµÄ·ç¸ñÒ²»òÆÓËØ»ò»îÆÃ£¬±¾ÀýÖÐÊDZÊÕßÖ÷Ò³ÉϵÄÒ»¸ö¹ØÓÚ“21ÊÀ¼Í×îÖØÒªµÄÊÇʲô£¿”µÄȤζµ÷²é£¬ÎªËµÃ÷ÎÊÌ⣬ÏÂÃæµÄ´úÂëÖÐÊ¡ÂÔÁËÃÀ¹ÛÐÞÊεĴúÂ룬Äã×Ô¼º¶¯ÊÖÉè¼ÆÊ±ÍêÈ«¿ÉÒÔʹÓñí¸ñµÈ¼¼ÇÉÃÀ»¯µ÷²éÎÊÌâµÄÏÔʾ¡£ÎªÁËʹÌá½»»òä¯ÀÀµ÷²éʱ²»Ó°Ïìµ±Ç°Ò³Ãæ£¬³ÌÐòÖиø³öÁ˵¯³öд°¿ÚµÄ·½°¸¡£
researchindex.html:
£¼ html £¾
£¼ title £¾µ÷²é°å²âÊÔ£¼ /title £¾
£¼ head £¾
£¼ !-- start£º¶¨ÒåпªµÄ´°¿Ú-- £¾
£¼ script language=javascript £¾
£¼ !--
var newWindow = null
function OpenWindow(htmurl)
{
if (! newWindow || newWindow.closed)
{
newWindow =
window.open(htmurl,"newwin","toolbar=no,resiza =no,scrollbars=no,width=400,height=280");
}else
{
newWindow.focus();
}
}
//-- £¾
£¼ /script £¾
£¼ !-- end£º¶¨ÒåпªµÄ´°¿Ú-- £¾
£¼ /head £¾
£¼ body £¾
£¼ !-- start£ºµ÷²éÌâÄ¿¡¢Ñ¡Ïî¡¡-- £¾
£¼ p £¾ÄúÈÏΪ2
Ïà¹ØÎĵµ£º
1. ASPÁ¬½ÓAccessÊý¾Ý¿âÓï¾ä
Set Conn=Server.CreateObject("ADODB.Connection")
Connstr="DBQ="+server.mappath("www/bbs.mdb")+";DefaultDir=;DRIVER={Microsoft
AccessDriver(*.mdb)};"
Conn.Open connstr
ÆäÖÐSet Conn=Server.CreateObject("ADODB.Connection")Ϊ½¨Á¢Ò»¸ö·ÃÎÊÊý¾ÝµÄ¶ÔÏó
server.mappath("w ......
ASPÈ«³ÆÎªActive Server Pages£¬ÊÇÒ»ÖÖÓÉ΢Èí(M1crosoft)¹«Ë¾¿ª·¢µÄ·þÎñÆ÷¶Ë½Å±¾ÓïÑÔÔËÐл·¾³£¬Ëü¿ÉÒÔ½áºÏHTMLÓïÑÔºÍActiveX×é¼þ½¨Á¢¶¯Ì¬¡¢½»»¥¡¢¸ßЧµÄWeb·þÎñÆ÷¶ËÓ¦ÓóÌÐò¡£µ±Ò»¸öÓû§ä¯ÀÀÆ÷´Óweb·þÎñÆ÷ÇëÇóÒ»¸öAsPÍøÒ³Ê±£¬web·þÎñÆ÷»á
½«Õâ¸öAsPÎļþ·¢Ë͸øweb·þÎñÆ÷µÄAsPÒýÇæ£¬AsPÒýÇæ½«¸ÃAsPÍøÒ³ÖÐ ......
<%
If Not IsNull(Request("fileName")) Then r = DownLoadFile(Request("fileName"))
Function DownLoadFile(fileName)
Dim s,fso,f,fLen
fileName = Server.MapPath(fileName)
'create stream
Set s = Server.CreateObject("ADODB.Stream")
s.Open()
s.Type = 1
Set fso = Server.CreateObject ......
±¾½â¾ö·½·¨Õª×ÔÍøÂçÎÄÕ£¬ÒѾÑéÖ¤¿ÉÐС£
ÐÂÉϵÄһ̨·þÎñÆ÷³öÏÖÁËÒ»¸öÏÖÏó£ºASP³ÌÐòÖУ¬µ÷Óú¯ÊýNow()£¬ÏÔʾµÄʱ¼ä×ÜÊÇÐÎÈç“2009-07-12 ÉÏÎç 08:12:56¡¡”ÕâÑùµÄ£¬×ÜÏÔʾ“ÉÏÎ町͓ÏÂÎ産¬µ¼ÖÂÊý¾Ý¿â²åÈë²Ù×÷Òì³££¬½â¾ö¹ý³Ì¼°×îÖÕ½â¾ö·½·¨ÈçÏ£º
ÕâôÏÔʾ£¬Ò»°ã¶¼Ê ......