asp³£ÓÃÎļþ²Ù×÷º¯Êý(¶þ)
<%
'*******************************************************
'×÷ ÓÃ: µÃµ½ÎļþÀ©Õ¹Ãû
'º¯ÊýÃû: GetFileExt(fileTrue)
'²Î Êý: sFileName ÎļþÃû
'·µ»ØÖµ: ·µ»ØÎļþÀ©Õ¹Ãû
'*******************************************************
function GetFileExt(sFileName)
GetFileExt = UCase(Mid(sFileName,InStrRev (sFileName, ".")+1))
End function
'*******************************************************
'×÷ ÓÃ: ASPÉÏ´«Â©¶´ "\0" ·À·¶
'º¯ÊýÃû: TrueStr(fileTrue)
'²Î Êý: sFileName ÎļþÃû
'·µ»ØÖµ: ºÏ·¨Îļþ·µ»Ø True ,·ñÔò·µ»ØFalse
'*******************************************************
function IsTrueFileName(sFileName)
dim str_len,pos
str_len=len(sFileName)
pos=Instr(sFileName,chr(0))
If pos=0 or pos=str_len then
IsTrueFileName = true
else
IsTrueFileName = false
End If
End function
'*******************************************************
'×÷ ÓÃ: ¼ì²âÉÏ´«µÄͼƬÎļþ(jpeg,gif,bmp,png)ÊÇ·ñÕæµÄΪͼƬ
Ïà¹ØÎĵµ£º
ASPÈçºÎÁ¬½ÓÊý¾ÝÔ´£¿(ϵͳDSN)Öн¨Á¢µÄÊý¾ÝÔ´£¿
ASPÔõô½¨Á¢Á¬½Ó£¬²»ÊÇOLEDB·½Ê½£¬ÓÃODBCÖеēÓû§DSN”½¨Á¢µÄÊý¾ÝÔ´½øÐÐÁ¬½Ó£¿ÈçºÎ²Ù×÷£¿
ÎÊÌâ²¹³ä£ºÎÒµÄÊÇODBCÖеēÓû§DSN”²»ÊǓϵͳDSN”£¬“Óû§DSN”ÔõôÁ¬½Ó£¿¶øÇÒÎÒµÄÊý¾Ý¿âÓÐÃÜÂë¡£
ÌáÎÊÕߣºÄäÃû
×î¼Ñ´ð°¸
Set co ......
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
if Request("MailtoAddress") <> "" then
¡¡¡¡¡¡¡¡msg = SendMail
(Request("SMTPServer"),Request("SMTPServerUserName"),Request("SMTPServerPassword"),
Request("MailDom ......
<%
'©³©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©¥©·
'©§¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡©§
'©§ Õª¡¡Òª£º ͳ¼ÆÍ¼--ÇúÏßͼ &n ......
¡¡¡¡ J2MEÊÇÀûÓÃHttpConnection½¨Á¢HTTPÁ¬½Ó£¬È»ºó»ñÈ¡Êý¾Ý£¬ASPÒ²ÊÇÀûÓÃHTTPÐÒ飬Òò¶ø¿ÉÒÔÀûÓÃJ2MEÓëASP½¨Á¢Á¬½Ó£¬´Ó¶ø·ÃÎÊÊý¾Ý¿â¡£
¡¡¡¡ ASPÊÇMicroSoft¹«Ë¾µÄ·þÎñÆ÷¶Ë¶¯Ì¬Ò³Ãæ¼¼Êõ£¬¿ÉÒÔ¸ù¾ÝÇëÇóÔËÐзþÎñÆ÷¶Ë³ÌÐòÈ»ºó·µ»Ø½á¹û£¬ÕâÒ²¸øMIDPÌṩºÜ¶àÓÐÓõŦÄÜ¡£ÓÉÓÚMIDP¿Í»§¶Ë´¦ÀíÄÜÁ¦²»Ç¿£¬Òò´Ë¿ÉÒÔ°ÑһЩ´¦ÀíÈÎÎñ·ÅÔ ......
ÓëASPÏà±È£¬ASP.NETÔÚºÜ¶à·½ÃæÓÐÁËÏÔÖøµÄ¸Ä½ø£¬ÕâЩ·½Ãæ°üÀ¨£ºÐÔÄÜ¡¢×´Ì¬¹ÜÀí¡¢¿ÉËõ·ÅÐÔ¡¢ÅäÖᢲ¿Êð¡¢°²È«ÐÔ¡¢Êä³ö»º´æ¿ØÖÆ¡¢ÍøÂ糡֧³ÖºÍXML Web services½á¹¹µÈ¡£
Èç¹ûÄú¾ßÓÐASP ¿ª·¢¼¼ÄÜ£¬ÔòÐ嵀 ASP.NET ±à³Ì ......