asp¿Õ¼äÈçºÎÅжÏjmail×é¼þÒѾ°²×°£¿ÊÇ·ñÖ§³ÖÄØ£¿
ÊÔÑéÁ˺þã¬ÖÕÓڸ㶨ÁË¡£
Ê×ÏÈ£¬±ØÐëÓдíÎó¼ÌÐø½øÐеÄÉùÃ÷On Error Resume Next
È»ºó³¢ÊÔ¼òÀújmailʵÀý£º
Dim JMail
Set JMail=Server.CreateObject("JMail.Message")
¶ÔʵÀý×ö³öÅжϣ¬Èç¹û×é¼þûÓа²×°³É¹¦£¬ÔòûÓд´½¨ÊµÀý£º
If JMail Is Nothing Then
Response.Write "²»Ö§³Ö"
Else
Response.Write "Ö§³Ö"
End If
ÆäËû×é¼þͬÑù´¦Àí£¬·Ç³£¼òµ¥ÁË¡£
×îºÃÔÚglobalÎļþÖд¦Àí£¬ÀïÃæÊ¹ÓõÄʱºò²»ÓÃÄÇôÂé·³ÁË¡£
×îºÃµÄ·½·¨°ÑÓʼþÉú³É·Åµ½Ò»¸ö±íÀȻºóÔÙ˵·¢Ë͵ÄÊÂÇé¡£
ÁõÈ«ºé 2009ÄêÊ¥µ®
Function object_install(strClassString)
On Error Resume Next
object_install=False
Dim xTestObj
Err=0
Set xTestObj=Server.CreateObject(strClassString)
If Err=0 Then object_install=True
Set xTestObj=Nothing
Err=0
End Function
Ïà¹ØÎĵµ£º
»¨ÁËÁ½¸öÍíÉϰïÅóÓѽ«Ò»¸öasp¿ª·¢µÄÍøÕ¾´ÓACCESSÊý¾Ý¿âתÏòSQL SERVER 2000. ÍøÉϲéÁËЩ×ÊÁÏ£¬¼ÓÉÏ×Ô¼ºµÄ¾Àú£¬×ܽ᣺
1¡¢Ê×ÏÈ¿´asp µÄ³ÌÐòÖÐÊÇ·ñÓÐ on error resume next; Èç¹ûÓÐ,ÏÈ×¢Ê͵ô¡£·ñÔòºÜ¶à´íÎóÎÞ·¨±©Â¶³öÀ´
2¡¢´´½¨SQL SERVER Êý¾Ý±í¡£ ʹÓÃSQL SERVER 2000×Ô´øµÄÊý¾Ýµ¼ÈëÏòµ¼£¬½«ACCESSÊý¾Ý¿âÖеıí½á¹¹£¬ÒÔ¼ ......
¿ÉÒÔʹÓà ASP.NET Login ¿Ø¼þ´´½¨µÇ¼ҳ¡£´Ë¿Ø¼þÌáÈ¡Óû§ÃûºÍÃÜÂ룬²¢Ê¹Óà ASP.NET ³ÉÔ±×ʸñºÍ Forms Éí·ÝÑéÖ¤À´ÑéÖ¤Óû§µÄƾ¾Ý²¢´´½¨Éí·ÝÑé֤Ʊ֤¡£
1¡¢´´½¨Ò»¸öʹÓà ASP.NET ³ÉÔ±×ʸñµÄ ASP.NET Web Ó¦ÓóÌÐò¡£ÓйØÏêϸÐÅÏ¢ºÍʾÀý£¬Çë²Î¼ûÅäÖà ASP.NET Ó¦ÓóÌÐòÒÔʹÓóÉÔ±×ʸñ ......
aspµ¼³öEXCELÊý×Ö¸ñʽ¼°×Ô¶¯ÊÊÓ¦¿í¶ÈµÄÎÊÌâ
ÏÂÃæÖ±½Ó½øÐдúÂëÑÝʾ£º
<%
If Response.IsClientConnected Then
Response.Flush
Else
Response.End
End If
Set xlApplication = Server.CreateObject("Excel.Application")
xlApplication.Visible = False
xlApplication.Workbooks.Add
Set xlWorksheet = xl ......
<%
Response.Buffer = True
'Ò»°ãÇé¿öÏ£¬µ±Óû§ÇëÇóWEB·þÎñÆ÷ʱ£¬·þÎñÆ÷°ÑÇëÇ󻨏´¸ø¿Í»§¶Ë¡£ÔÚ¿Í»§¶Ë£¬ä¯ÀÀÆ÷°Ñ»º´æ×÷ΪһÖÖ¼Ó¿ìËٶȵIJßÂÔ£¬¾ÍÊǵ±ÇëÇóʱÏȼì²é»º´æµÄÇé¿ö£¬Èç¹ûÓоÍÖ±½Óµ÷»º´æÁË£¬¶ø²»ÇëÇó·þÎñÆ÷ÁË¡£
'ÔÚWEB³ÌÐòÉè¼ÆÖУ¬ÓÐʱΪÁË·ÀÖ¹ÖØ¸´µÄÌá½»»òÕßÑϸñµÄ´ÎÐòµÈ£¬±ØÐëÈÃÓû§µÄÊý¾ÝÁ¢¼´ÔÚʹÓúó¾Í ......
public static void SetTreeNode(System.Web.UI.WebControls.TreeView treeRolePopedom, string rolecode,out string errMsg)
{
int k = 0;
& ......