vc2005±àдasp×é¼þµÄÎÊÌâ
http://tech.ddvip.com/2006-04/11447178004876.html
ÎÒ°´ÉÏÃæµÄ½Ì³Ì£¬Ñ§Ï°Ð´¸öASP×é¼þ¡£µ«ÓÃaspµ÷ÓõÄʱºò
Dim obj
Set obj = CreateObject("Simple2.Fun") ¡®Õâ¸öµØ·½Ã»ÎÊÌâ
Dim plus
plus = obj.Add(1,2) 'Õâ¸öµØ·½Ìáʾ
Microsoft VBScript ÔËÐÐʱ´íÎó ´íÎó '800a01a8'
ȱÉÙ¶ÔÏó
/1.asp£¬ÐÐ 11
//ÓôÃÆºÃ¼¸ÌìÁË£¬¸ßÊÖÃǰïÏÂæ¡£
×¢²á³É¹¦£¬·þÎñÆ÷ÓõÄ2003£¬¿ª·¢ÓÃVS2005
Ҫô£¬ÊÇÄãµÄä¯ÀÀÆ÷µÄ°²È«ÉèÖÃÎÊÌ⣬½«°²È«ÏµÊýµÈ¼¶½µÏÂÀ´£¬±Ï¾¹Äã×Ô¼ºÐ´µÄ¶«Î÷ûǩÃû£¬ÊÇ¡°Ò°COM¡±
лл´ó¼Ò£¬É¢·Ö£¬½¨Á¢ÏîÄ¿µÄʱºòÓ¦¸ÃÑ¡Ë«ÖØ½Ó¿Ú¡£
Ïà¹ØÎÊ´ð£º
ÎÒÃÇÓÐÒ»¸öÍøÕ¾Ä£°å£¬www.c111.com.cn,Ï£ÍûÐÞ¸ÄһЩµØ·½£º
1£©µã»÷×ó²à¡°·þÎñÆ·ÅÆ¡±µÄÆäÖÐÒ»¸öС·ÖÀ࣬Èç¡°×ãÇò¡±£¬½çÃæµÄÓÒ²à¾Í³öÏÖÈçwww.c111.com.cn/1.jpg£¬µã»÷1.jpgÉÏ·½µÄÆäÖÐÒ»¸öÆ·ÅÆlogo£¬ÏÂÃæ¾Í³öÏÖÏà¹ØµÄÍ ......
µ±½áÊøÊ±¼ä´óÓÚ¿ªÊ¼Ê±¼äÔòÏÔʾδÍê³É
µ±½áÊøÊ±¼äСÓÚ¿ªÊ¼Ê±¼äÔòÏÔʾδ´ïµ½ÈÎÎñ
ûÓÐʱ¼äÔòÏÔʾÕýÔÚ½øÐÐÖÐ
asp´úÂëÓ¦¸ÃÔõôд
Èç:¿ªÊ¼Ê±¼ä ½áÊøÊ±¼ä & ......
ÎÒµÄ網頁´ú碼為ASP語ÑÔ,驗證·½Ê½為ϵ統×Ô帶µÄWINDOW驗證ģʽ.
現ÔÚÎÒÈç¹ûÒªÔÚASP´ú碼ÖÐ獲È¡當ǰµÄµÇÈëÈË ......
Îļþ£ºfolder.inc
HTML code:
<%
Dim folderini,pos,pageName
fPath = Request.ServerVariables("PATH_TRANSLATED")
pos = instrRev(fPath,"\")
folderini = Left(fPath,pos)+&qu ......