ASP WebServiceµÄ¿ª·¢²½Öè
WebService·þÎñ¶Ë¿ª·¢
1¡¢´´½¨WebService¹¤³Ì£¬Ñ¡ÔñXFire Core¿â
2¡¢´´½¨ÒµÎñ½Ó¿ÚºÍÆäʵÏÖÀࣨÍê³ÉÒµÎñ·½·¨µÄ¶¨ÒåºÍʵÏÖ£©
3¡¢ÐÞ¸ÄÅäÖÃÎļþservice.xml
4¡¢Èç¹ûÐèҪʹÓÃWSDL£¬ÔòÐèÒªµ¼Èëxalan.jarÎļþÖÁWEB-INF/libÖÐ
5¡¢µ¼³ö½Ó¿ÚÖÁjar°üÖÐΪ¿Í»§¶Ë×ö×¼±¸
WebService¿Í»§¶Ë¿ª·¢
1¡¢´´½¨Web¹¤³Ì£¬Ìí¼Ó¹¹½¨Â·¾¶£¬Ñ¡ÔñXFire Core¿âºÍXFire Http Client¿â
2¡¢µ¼Èë·þÎñ¶ËÌṩµÄjar°ü£¨¼´ÉÏÊö·þÎñ¶Ë¿ª·¢²½ÖèÖеÚÎå²½µ¼³öµÄjar£©
3¡¢Íê³ÉWebServiceÔ¶³Ìµ÷ÓÃ
3.1 ´´½¨ServiceÄ£ÐÍ
3.2 ¶¨ÒåWebServiceµÄURL
3.3 ´´½¨XFire¶ÔÏó
3.4 ͨ¹ýXFire¶ÔÏó´´½¨XFire´úÀí¹¤³§¶ÔÏó
3.5 ͨ¹ýXFire´úÀí¹¤³§¶ÔÏ󣬴«µÝServcieÄ£ÐͺÍServcieµÄµØÖ·£¬¹¹½¨ÒµÎñ¶ÔÏóʵÀý£¨×¢Òâ×öÇ¿ÖÆÀàÐÍת»»£©
3.6 µ÷ÓÃÒµÎñ¶ÔÏóµÄÒµÎñ·½·¨£¬Íê³ÉÒµÎñ´¦Àí
3.7 ¼ÌÐøºóÐø²Ù×÷
Ïà¹ØÎĵµ£º
Function WriteToUTF(content,sFilen)'contentΪÌæ»»ºóµÄ×Ö·û´®,filenameΪÉú³ÉµÄÎļþÃû
dim objStream
Set objStream = Server.CreateObject("ADODB.Stream")
With objStream
.Open
&nb ......
1.UpLoadClass.asp
<%
Class UpLoadClass
Private p_MaxSize,p_FileType,p_SavePath,p_AutoSave,p_Error
Private objForm,binForm,binItem,strDate,lngTime
Public FormItem,FileItem
Public Property Get Version
Version=""
End Property
......
ÔÚaspÊý×鶨ÒåÖÐ,¿ÉÒÔÖ±½Ó¶¨Òå,Ò²¿ÉÒÔʹÓÃArrayº¯Êý¶¨Òå..
ÏÈ¿´ÓÃArray()º¯Êý¶¨ÒåÀý×Ó:
<%
dim MyArray
MyArray=Array("ÌìÑÄ·çÔÆ","СС³ÌÐòÔ±")
%>
<p><%=MyArray(1)%></p>
·µ»Ø½á¹û:СС³ÌÐòÔ±
Ö±½Ó¶¨Òå:
<%
dim MyArray(2)
MyArray(0)="ÌìÑÄ·çÔÆ"
MyArray(1)="СС³ ......
©¶´ÃèÊö:
ÔÚlogin.aspÖУ¬½ÓÊÕÓû§ÊäÈëµÄUseridºÍPasswordÊý¾Ý£¬²¢·Ö±ð¸³Öµ¸øuserºÍpwd£¬È»ºóÔÙÓÃsql="select * from admin where username="&user&" and password="&pwd&"" Õâ¾äÀ´¶ÔÓû§ÃûºÍÃÜÂë¼ÓÒÔÑéÖ¤¡£
ÒÔ³£ÀíÀ´¿¼ÂǵĻ°£¬ÕâÊǸöºÜÍêÕûµÄ³ÌÐòÁË¡£¶øÔÚʵ¼ÊµÄʹÓùý³ÌÖУ¬ÕûÌ׳ÌÐòÒ²µÄ ......
<%
'¹ºÎï³µÀà ÀàÃû£ºUserCart
'×÷Õß:gameing
'»ù±¾ÔÀí:´ËÀàÓ÷þÎñÆ÷Session±äÁ¿±£´æÉÌÆ·Êý¾Ý,ÉÌÆ·ÓÃÒ»¸öÊý×é±íʾ.´ËÀàÀïÃæ±£´æÁËÈýÖÐÉÌÆ·¼Û¸ñ.
'1¡¢2008-11-25ÐÞ¸ÄFunction AddItem() by tommy ÉÌÆ·Ôö¼ÓÔÚ×îºó
'2¡¢2008-11-25ÐÞ¸Äby tommy Ôö¼Óɾ³ýÉÌÆ·¹ý³Ì Sub DelItem()
'3¡¢2008-11-25ת»»Ò»Ð©Êý¾ÝÀàÐͲÅÄÜÔ ......