Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

asp_Êý¾Ý¿â²Ù×÷·â×°

Ò»¡¢conn.asp
<%
  '@Language="VBSCRIPT" CODEPAGE=65001  
  'meta http-equiv="Content-Type" content="text/html; charset=gb2312"  
  ' 936  utf-8
  class TDB
    function qry(byval sqlquery)
      dim adoConn,adoRS
      set adoConn=server.createobject("ADODB.connection")
      adoConn.open "provider=microsoft.jet.oledb.4.0;data source=" & Server.MapPath(".")  & "/sys.mdb"  
      set adoRS=server.createobject("ADODB.RecordSet")
      adoRS.open sqlquery,adoConn,1,3   'support movelast   (adOpenKeySet,adLockOptimistic)
      'set adoRS=adoConn.execute(sqlquery)    'don't support movelast
      '
      dim rtnstr
      rtnstr="<?xml version='1.0' encoding='gb2312' standalone='yes' ?>" & chr(13)& chr(10)
      rtnstr=rtnstr & "<rs>"  & chr(13)& chr(10)
      irow=0
      adoRS.movefirst
      do while not adoRS.Eof
        rtnstr=rtnstr & "  <r" & cstr(irow) & ">"  & chr(13)& chr(10)
        for i=0 to adoRS.Fields.Count-1
          rtnstr=rtnstr & "    <" & adoRS.Fields(i).name & ">" & chr(13)& chr(10)
          rtnstr=rtnstr & "<![CDATA[ " & adoRS.Fields(i) & " ]]>


Ïà¹ØÎĵµ£º

ASP ³£Óú¯Êý»ýÀÛ

LBound() º¯Êý: ·µ»ØÖ¸¶¨µÄÊý×éά¿ÉÓõÄ×îСϱꡣ
UBound() º¯Êý: ·µ»ØÖ¸¶¨µÄÊý×éά¿ÉÓõÄ×î´óϱꡣ
InStr([start, ]string1, string2[, compare]) ·µ»Ø×Ö·û»ò×Ö·û´®ÔÚÁíÒ»¸ö×Ö·û´®ÖеÚÒ»´Î³öÏÖµÄλÖÃ
InStrRev()º¯Êý ·µ»ØÄ³×Ö·û´®ÔÚÁíÒ»¸ö×Ö·û´®ÖÐ×îºó³öÏÖµÄλÖÃ
CDate() º¯Êý¿É°ÑÒ»¸öºÏ·¨µÄÈÕÆÚºÍʱ¼ä±í´ïʽת»»Îª ......

ASPÀàµÄ±àд

ASPÀà
£½£½£½£½£½£½£½£½£½
ʹÓÃVBSµÄASPÒ²Äܶ¨ÒåÀàµÄ£¡±¾ÎĽ«½éÉܶ¨Ò塢ʹÓÃÀàµÄ»ù±¾·½·¨¡£
ÔÚASP£¨ÌØÖ¸Ê¹ÓÃVBSµÄASP£¬ÏÂͬ£©ÀʹÓÃClassÓï¾äÀ´ÉùÃ÷Ò»¸öÀà¡£Óï·¨ÈçÏ£º
Class ˈ̞
End Class
ÀàµÄ¶¨Òå¡¢±äÁ¿¡¢ÊôÐԺͷ½·¨µÈ¶¼°üº¬ÔÚClass...End Class¿éÖС£
ÏÂÃæ¾Í¿ÉÒÔ¶¨ÒåÀàµÄÊôÐԺͷ½·¨ÁË¡£Õýʽ½²ÊôÐÔ¡¢·½·¨µ ......

ASPÁ¬½ÓÊý¾Ý¿âµÄÈ«ÄÜ´úÂë

aspÁ¬½ÓaccessºÍmssqlµÄÍòÄÜ´úÂ룺
'½â¾öÁËACCESSÊý¾Ý¿â·¾¶µÄÎÊÌ⣡
'²ÉÓÃDBType=0»òDBType=1À´Çø·ÖAC¿â»¹ÊÇMSSQL¿â
'¾ßÌå²ÉÓÃAC¿âʱӦעÒâµÄÊÂÏÇë¿´³ÌÐò˵Ã÷
-----------------------------------------------
Dim DBType,Conn,StrConn
DBType=0 '0ΪAccessÊý¾Ý¿â£¬1ΪMSSQLÊý¾Ý¿â
If(DBType=0) Then
......

¼èÄѵľñÔñ£ºPHPÓëASPµÄ×ۺϱȽÏ

ʲôÊÇPHP
¡¡¡¡PHP´ú±íÁË"³¬Îı¾´¦ÀíÆ÷"£¬ÕâÒâζ×ÅÄã±ØÐëÖªµÀ£¬ËüÊÇÒ»ÖÖ·þÎñÆ÷¶ËµÄ´¦ÀíÓïÑÔ£¬ÇÒÒÔHTMLµÄÐÎʽ³öÏÖ¡£Ëü×î³£Óõĵط½¾ÍÊÇÍøÒ³ÁË£¬Êý¾Ý´Ó¿Í»§»ú·¢Ë͵½Web·þÎñÆ÷£¬ÐÅÏ¢Ôڴ˱»´¦Àí²¢·µ»Ø½á¹û¡£
¡¡¡¡µ«ÕâÖÖͨÓÃÐÔµÄÓïÑÔË¿ºÁ²»¾ÖÏÞÓÚÔÚÍøÒ³·½Ã棬PHPÒ²Äܱ»ÓÃÔÚÃüÁîÐÐshellÖУ¬Ëü¿É×÷Ϊ²Ù×÷ϵͳµÄÒ»¸öÀ©Õ¹£¬ÓÉ´ËÖ´Ð ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ