ASPÖе÷Óôø²ÎÊýÊä³öµÄCOM½Ó¿Ú
COM½Ó¿ÚVCʵÏÖ,½Ó¿Ú:
[id(1), helpstring("method Test")] HRESULT Test([in] BSTR strInputA, [in] BSTR strInputB, [out,retval] VARIANT* result);
ASPµ÷Óãº
Set objCompInfo =server.CreateObject("×é¼þÔÚϵͳÖеÄÃû×Ö")
result=objCompInfo.Test(arrIn,arrout)
"×é¼þÔÚϵͳÖеÄÃû×Ö" ¸ÃÖµÔÚVCÏîÄ¿ÖеÄrgsÎļþÖпÉÒÔÕÒµ½
Ïà¹ØÎĵµ£º
ajax+asp.net+mssqlʵÏÖµÄajaxÎÞË¢ÐÂÁÄÌìÊÒ£¬Ö§³Öhtml web±à¼Æ÷¡£
ΪÁ˼ӿìËٶȣ¬Ê¹ÓÃÁË´æ´¢¹ý³Ì¡£
asp¼°php°æ±¾Çë¿´ÏÂÃæµÄÎÄÕÂ
ajax+asp+mssqlÎÞË¢ÐÂÁÄÌìÊÒ
ajax+php+mssqlÎÞË¢ÐÂÁÄÌìÊÒ
´ËÀý×ÓÒ²¿ÉÒÔ×÷Ϊmssql´æ´¢¹ý³ÌʹÓõÄʾÀý£¬Èçphpµ÷ÓÃmssqlµÄ´æ´¢¹ý³Ì£¬php»ñÈ¡mssqlÊý¾Ý¿âµÄÊä³ö²ÎÊý¡£
ҪʹÓò»Í¬µÄ¶¯Ì¬Ò³Ãæ£ ......
1.avi¸ñʽ
<object id="video" width="400" height="200" border="0" classid="clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA">
<param name="ShowDisplay" value="0">
<param name="ShowControls" value="1">
<param name="AutoStart" value="1">
<param name="AutoRewind" value="0"> ......
´ò¿ªFCKEditor/Editor/Filemanager/Connectors/Asp/Commands.aspÎļþ£¬ÐÞ¸ÄFileUploadº¯Êý£¬ÈçÏÂËùʾ£º
Sub FileUpload( resourceType, currentFolder, sCommand )
Dim oUploader
Set oUploader = New NetRube_Upload
oUploader.MaxSize = 0
oUploader.Allowed = ConfigAllowedExtensions.Item( ......
Éý»ªÌṩÖÕÉíÃâ·ÑASP+access PHP+mysqlÐéÄâÖ÷»ú
Ò»£ºÉý»ªÍøÂç¿Æ¼¼ÓÐÏÞ¹«Ë¾,ÓëÉý»ªÍ¬ÔÚÕ¾³¤ÖÕÉíÃâ·Ñ¿Õ¼ä·ö³Ö¼Æ»®.
1¡¢×ð¾´µÄÓû§ÄúºÃ,Ò²ÐíÄú»¹ÔÚΪÿÄêÒ»½»µÄ¿Õ¼ä·ÑÓ÷¢³î,Ò²ÐíÄúÏë»ñµÃÒ»¸ö¸üÓÅÖʵĿռäÈ´²»ÏëͶÈëÌ«¶à,´ÓÏÖÔÚÆð ÕâЩÎÊÌ⽫ÓÈжø½â→Éý»ªÍøÂç←ÓëÉý»ªÍ¬ÔÚÕ¾³¤·ö³Ö¼Æ»®È«ÃæÆô¶¯¡£
2¡¢Ã»ÓÐ×¢²á¹«Ë¾ ......
<%
'true=ÊÇÓʼþ;false=²»ÊÇ;
Function validate(ByVal str)
Dim temp,reg
Set reg = new regexp
reg.ignorecase=true
reg.global=true
reg.pattern = "^\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*$"
validate = reg.test(Trim(str))
Set reg = Nothing
End Function
'************************ ......