Asp Split(Ò»¸ö¹ØÓÚSplitº¯ÊýÔÚASPÖÐʹÓ÷½·¨µÄ°¸Àý)
Asp Split
ÃèÊö£º
·µ»Ø»ùÓÚ 0 µÄһάÊý×飬ÆäÖаüº¬Ö¸¶¨ÊýÄ¿µÄ×Ó×Ö·û´®¡£
Óï·¨£º
Split(expression[, delimiter[, count[, start]]])
Split º¯ÊýµÄÓï·¨ÓÐÒÔϲÎÊý£º
²ÎÊý ÃèÊö
expression ±ØÑ¡¡£×Ö·û´®±í´ïʽ£¬°üº¬×Ó×Ö·û´®ºÍ·Ö¸ô·û¡£Èç¹û expression ΪÁ㳤¶È×Ö·û´®£¬Split ·µ»Ø¿ÕÊý×飬¼´²»°üº¬ÔªËغÍÊý¾ÝµÄÊý×é¡£
delimiter ¿ÉÑ¡¡£ÓÃÓÚ±êʶ×Ó×Ö·û´®½çÏÞµÄ×Ö·û¡£Èç¹ûÊ¡ÂÔ£¬Ê¹Óÿոñ ("") ×÷Ϊ·Ö¸ô·û¡£Èç¹û delimiter ΪÁ㳤¶È×Ö·û´®£¬Ôò·µ»Ø°üº¬Õû¸ö expression ×Ö·û´®µÄµ¥ÔªËØÊý×é¡£
count ¿ÉÑ¡¡£±»·µ»ØµÄ×Ó×Ö·û´®ÊýÄ¿£¬-1 ָʾ·µ»ØËùÓÐ×Ó×Ö·û´®¡£
compare ¿ÉÑ¡¡£Ö¸Ê¾ÔÚ¼ÆËã×Ó×Ö·û´®Ê±Ê¹ÓõıȽÏÀàÐ͵ÄÊýÖµ¡£ÓйØÊýÖµ£¬Çë²ÎÔÄ“ÉèÖÔ²¿·Ö¡£
ÉèÖÃ
compare ²ÎÊý¿ÉÒÔÓÐÒÔÏÂÖµ£º
³£Êý Öµ ÃèÊö
vbBinaryCompare 0 Ö´Ðжþ½øÖƱȽϡ£
vbTextCompare 1 Ö´ÐÐÎı¾±È½Ï¡£
vbDatabaseCompare 2 Ö´ÐлùÓÚÊý¾Ý¿â£¨ÔÚ´ËÊý¾Ý¿âÖÐÖ´ÐбȽϣ©Öаüº¬µÄÐÅÏ¢µÄ±È½Ï¡£
———————————————————————————————————————————
Ò»¸ö¹ØÓÚSplitº¯ÊýÔÚASPÖÐʹÓ÷½·¨µÄ°¸Àý£º
———————————————————————————————————————————
´ó¼ÒÓÐÅöµ½¹ýÒªÏëȡһ×Ö·û´®ÀïµÄijЩֵ¶øÎÞ´ÓÏÂÊÖ£¿ÓÐûÓоõµÃ¿´Êé»ò½Ì²Ä¶ÔsplitµÄд·¨ºýÀïºýÍ¿……Èç¹ûÓдËÒÉÎʵϰ£¬Çë¿´ÏÂÃæÎÒ¶ÔÀý×ӵĽâÊÍ£¬ÏàÐÅÄú»á¶ÔÕâ¸öÓÐÒ»¶¨µÄÁ˽⡣
¡¡¡¡ÎÒÏȽéÉÜÒ»ÏÂSplitº¯ÊýµÄÓ÷¨:
·µ»ØÖµÊý×é = Split("×Ö·û´®","·Ö¸î·û")
¡¡¡¡¼ÙÉè±äÁ¿strURL±£´æ×ÅURLÖµ£¬ÈçstrURL = "ftp://username:password@server";£¬ÕâÊÇÎÒÃÇÔڣɣÅÖеǼµ½FTPÉÏʱµÄ£Õ£Ò£ÌÐÎʽ£¬Èç¹ûÎÒÃÇÏë°ÑÆäÖеÄusernameºÍpasswordÈ¡³öÀ´µÄ»°£¬¸ÃÔõô°ìÄØ£¿µ±È»½â¾öµÄ·½·¨ÓÐÐí¶à£¬ÔÚÕâÀïÎÒÃÇÖ»½éÉÜÓÃSplitÀ´½â¾öµÄ·½·¨¡£Ê×ÏÈ£¬ÎÒÃÇÕÒ³ö·Ö¸î·û¡£ÎÒÃÇ·¢ÏÖÔÚÕâ¸ö
Ïà¹ØÎĵµ£º
Sub CreateAccessDB(DBToCreate)
Dim catNewDB ' As ADOX.Catalog
Set catNewDB = Server.CreateObject("ADOX.Catalog")
catNewDB.Create "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & se ......
±¾ÎÄÁ´½Ó£ºhttp://www.oversteper.com/wprogram/asp/827.html
Ìõ¼þÓï¾äÖ® if ... then ... else Óï¾ä
ÓÃÀ´ÅжÏÌõ¼þÊÇ true »ò false £¬²¢¸ù¾ÝÅжϽá¹ûÀ´Ö´ÐÐÖ¸¶¨µÄÓï¾ä£¬Í¨³£Ìõ¼þÊÇÓñȽÏÔËËã·û¶ÔÖµ»ò±äÁ¿½øÐбȽÏÀ´±í´ï¡£
if ... then ... else ¿ÉÒÔ¸ù¾ÝÐèÒª½øÐÐǶÌ×ʹÓ㬿ÉÒÔд³É elseif ¡£
ʾÀý£º
ÒÔÏÂÎ ......
ǰ¶Îʱ¼ä¶ÁÁ˲»ÉÙ¹ØÓÚMVCµÄÎÄÕ£¬ÊÔ×ÅÔÚASPÖÐÓ¦ÓÃÁËһϣ¬·¢ÏÖ¶ÔÓÚС³ÌÐò£¬´úÂëÁ¿»á´ó·ù¶ÈÔö¼Ó£¬µ«ÊÇÂß¼ÇåÎú£¬Êý¾Ý·â×°ºÜºÏÀí£¬ÒÔǰÐèÒª×Ðϸ¹æ»®µÄ´úÂ븴Óþ¹È»³ÉÁËÀíËùµ±È»µÄÊÂÇé¡£
ËùνMVC£¬¼´Model£¨Ä£ÐÍ£©£¬View£¨ÊÓͼ£©£¬Control£¨¿ØÖÆ£©Èý²ã¼Ü¹¹¡£¸÷²¿·Ö¸÷˾ÆäÖ°£¬Model¼´µ×²ã¹¹¼Ü£¬°üº¬ÓëÊý¾Ý¿âÁ¬½ÓµÄ²¿·Ö£¬View ......
¡ï1. ʹÓÃQueryString±äÁ¿
¡¡¡¡¡¡QueryStringÊÇÒ»Öַdz£¼òµ¥µÄ´«Öµ·½Ê½£¬Ëû¿ÉÒÔ½«´«Ë͵ÄÖµÏÔʾÔÚä¯ÀÀÆ÷µÄµØÖ·À¸ÖС£Èç¹ûÊÇ´«µÝÒ»¸ö»ò¶à¸ö°²È«ÐÔÒªÇ󲻸߻òÊǽṹ¼òµ¥µÄÊýֵʱ£¬¿ÉÒÔʹÓÃÕâ¸ö·½·¨¡£µ«ÊǶÔÓÚ´«µÝÊý×é»ò¶ÔÏóµÄ»°£¬¾Í²»ÄÜÓÃÕâ¸ö·½·¨ÁË¡£ÏÂÃæÊÇÒ»¸öÀý×Ó£º
a.aspxµÄC#´úÂë
private void B ......
<%
'½¨Á¢Îļþ¼Ðº¯Êý
Function CreateFolder(strFolder)'²ÎÊýΪÏà¶Ô·¾¶
'Ê×Ñ¡ÅжÏÒª½¨Á¢µÄÎļþ¼ÐÊÇ·ñÒѾ´æÔÚ
Dim strTestFolder,objFSO
strTestFolder = Server.Mappath(strFolder)
Set objFSO = CreateObject("Scripting.FileSystemObject")
'¼ì²éÎļþ¼ÐÊÇ·ñ´æÔÚ
If not objFSO.FolderExists(strTestF ......