ÄúµÄλÖãºÊ×Ò³ ¡ú ÍøÒ³Éè¼Æ ¡ú ASPʵÀý ¡ú ʵÀýÑÝÁ·ASP+XML±à³Ì4

ʵÀýÑÝÁ·ASP+XML±à³Ì4

ʱ¼ä£º2004/11/7 3:02:00À´Ô´£º±¾Õ¾ÕûÀí×÷ÕߣºÀ¶µãÎÒÒªÆÀÂÛ(0)

¡¡¡¡Îå¡¢³ÌÐòÊ×Ò³£¨default.asp£©

£ £ µ÷ÓÃÏàÓ¦µÄ°üº¬ÎļþºÍ¹«¹²º¯Êý£¬¸ñʽ»¯XMLÎļþ£¬²¢½øÐÐÏÔʾ¡£¿ÉÒÔ¿´µ½£¬Ò³ÃæTitleÊǿɶ¨ÖƵģ¬¹«¹²µÄÍ·²¿ºÍβ²¿¶¼×ö³ÉÁËÏàÓ¦µÄ°üº¬Îļþ¡£C_TITLE¡¢C_XMLFILEºÍC_XSLFILEΪ¹«¹²³£Á¿£¬ÔÚconstpub.aspÎļþÖж¨Ò壬ÖÁÓÚËüÃǵÄÒâÒ壬ÏàÐŶÁÕß¿ÉÒÔºÜÈÝÒ×µØÃ÷°×¡£ÕâÀïµ÷ÓÃÁËÉÏÃ涨ÒåµÄFormatXmlº¯Êý¡£

£¼% Option Explicit '*********************************************** ' ˵Ã÷£ºÍ¨Ñ¶Â¼ ' ×÷Õߣºgwd 2002-11-05 '*********************************************** %£¾ £¼!--#include file="pub/funcxml.asp"--£¾ £¼!--#include file="pub/constpub.asp"--£¾ £¼HTML£¾ £¼HEAD£¾ £¼TITLE£¾£¼% = C_TITLE %£¾£¼/TITLE£¾ £¼META HTTP-EQUIV="content-type" CONTENT="text/html;charset=GB2312"/£¾ £¼link rel="stylesheet" href="contact.css" type="text/css"£¾ £¼/HEAD£¾ £¼BODY£¾ £¼!--#include file="pub/header.asp"--£¾ £¼% = FormatXml(C_XMLFILE, C_XSLFILE) %£¾ £¼br£¾ £¼!--#include file="pub/footer.asp"--£¾ £¼/BODY£¾ £¼/HTML£¾

¡¡¡¡Áù¡¢Ìí¼Ó¡¢Ð޸ĺÍɾ³ýXMLÖеÄÐÅÏ¢

£ £ ÎÒÃÇÖªµÀ£¬ÔÚCls_PersonÖÐÒѾ­¶¨ÒåÁËÏàÓ¦µÄ·½·¨£¬Òò´Ë£¬ÔÚ¸÷¸öÎļþÖУ¬Ö»ÐèÒªµ÷ÓöÔÓ¦µÄ·½·¨¼´¿É¡£Ìí¼ÓÐÅÏ¢µÄÎļþΪadd.asp£¬ÐÞ¸ÄÐÅÏ¢µÄÎļþΪedit.asp£¬É¾³ýÐÅÏ¢µÄÎļþΪdelete.asp£¬ÎÒÃǽöÒÔadd.aspÎļþΪÀý½øÐÐ˵Ã÷¡£ÆäÖеÄCheckStrInputºÍCheckStrOutputº¯Êý£¬ÓÃÀ´¸ñʽ»¯Óû§µÄÊäÈëºÍÊä³ö×Ö·û´®¡£

£¼% Option Explicit '*********************************************** ' ˵Ã÷£º37080308ͨѶ¼ ' ×÷Õߣºgwd 2002-11-05 '*********************************************** %£¾ £¼!--#include file="pub/funcxml.asp"--£¾ £¼!--#include file="pub/constpub.asp"--£¾ £¼!--#include file="pub/funcpub.asp"--£¾ £¼!--#include file="pub/class/clsPerson.asp"--£¾ £¼% ¡¡Dim objXml, objPerson ¡¡Dim strErr ¡¡Set objXml = Server.CreateObject("MSXML2.DOMDocument") ¡¡Set objPerson = New Cls_Person ' Éú³ÉCls_Person¶ÔÏó ¡¡If Request.Form("btnOk") £¼£¾ "" Then ¡¡¡¡If LoadXmlDoc(objXml, C_XMLFILE, False, strErr) Then ' ×°ÔØXMLÎļþ ¡¡¡¡¡¡' ¸øÏàÓ¦µÄÊôÐÔ¸³Öµ ¡¡¡¡¡¡objPerson.Name = CheckStrInput(Request.Form("txtName")) ¡¡¡¡¡¡objPerson.Nick = CheckStrInput(Request.Form("txtNick")) ¡¡¡¡¡¡objPerson.Mobile = CheckStrInput(Request.Form("txtMobile")) ¡¡¡¡¡¡objPerson.Tel = CheckStrInput(Request.Form("txtTel")) ¡¡¡¡¡¡objPerson.Email = CheckStrInput(Request.Form("txtEmail")) ¡¡¡¡¡¡objPerson.QQ = CheckStrInput(Request.Form("txtQQ")) ¡¡¡¡¡¡objPerson.Company = CheckStrInput(Request.Form("txtCompany")) ¡¡¡¡¡¡If Not objPerson.AddToXml(objXml) Then ' µ÷ÓÃCls_PersonÀàµÄAddToXml·½·¨£¬Ìí¼ÓÊý¾Ý ¡¡¡¡¡¡¡¡AddErr strErr, objPerson.GetLastError ¡¡¡¡¡¡Else ¡¡¡¡¡¡¡¡AddErr strErr, "Ìí¼Ó³É¹¦" ¡¡¡¡¡¡¡¡Response.Write "£¼script language=""javascript""£¾opener.location.reload();£¼/script£¾" ¡¡¡¡¡¡End If ¡¡¡¡End If ¡¡End If ¡¡Set objXml = Nothing %£¾ £¼HTML£¾ £¼HEAD£¾ £¼TITLE£¾£¼% = C_TITLE %£¾£¼/TITLE£¾ £¼META HTTP-EQUIV="content-type" CONTENT="text/html;charset=GB2312"/£¾ £¼link rel="stylesheet" href="contact.css" type="text/css"£¾ £¼script language="javascript"£¾ £¼!-- function CheckForm() { ¡¡return true; } //--£¾ £¼/script£¾ £¼/HEAD£¾ £¼BODY£¾ £¼% = strErr %£¾ £¼div class="title"£¾Ìí¼ÓÁªÏµÐÅÏ¢£¼/div£¾ £¼form name="form1" method="post" action="add.asp" onsubmit="return CheckForm()"£¾ ¡¡£¼table align="center" width="100%" cellspacing="1" cellpadding="2" border="0" bgcolor="#666600"£¾ ¡¡¡¡£¼tr bgcolor="#ffffff"£¾ ¡¡¡¡¡¡£¼td width="25%" bgcolor="#e5e5e5" align="right"£¾£¼b£¾ÐÕÃû£º£¼/b£¾£¼/td£¾ ¡¡¡¡¡¡£¼td width="75%"£¾£¼input type="text" name="txtName" size="25" class="input" value="£¼%=CheckStrOutput(objPerson.Name)%£¾"£¾£¼/td£¾ ¡¡¡¡£¼/tr£¾ ¡¡¡¡£¼tr bgcolor="#ffffff"£¾ ¡¡¡¡¡¡£¼td bgcolor="#e5e5e5" align="right"£¾£¼b£¾Ó¢ÎÄÃû£º£¼/b£¾£¼/td£¾ ¡¡¡¡¡¡£¼td£¾£¼input type="text" name="txtNick" size="25" class="input" value="£¼%=CheckStrOutput(objPerson.Nick)%£¾"£¾£¼/td£¾ ¡¡¡¡£¼/tr£¾ ¡¡¡¡£¼tr bgcolor="#ffffff"£¾ ¡¡¡¡¡¡£¼td bgcolor="#e5e5e5" align="right"£¾£¼b£¾ÊÖ»ú£º£¼/b£¾£¼/td£¾ ¡¡¡¡¡¡£¼td£¾£¼input type="text" name="txtMobile" size="25" class="input" value="£¼%=CheckStrOutput(objPerson.Mobile)%£¾"£¾£¼/td£¾ ¡¡¡¡£¼/tr£¾ ¡¡¡¡£¼tr bgcolor="#ffffff"£¾ ¡¡¡¡¡¡£¼td bgcolor="#e5e5e5" align="right"£¾£¼b£¾µç»°£º£¼/b£¾£¼/td£¾ ¡¡¡¡¡¡£¼td£¾£¼input type="text" name="txtTel" size="25" class="input" value="£¼%=CheckStrOutput(objPerson.Tel)%£¾"£¾£¼/td£¾ ¡¡¡¡£¼/tr£¾ ¡¡¡¡£¼tr bgcolor="#ffffff"£¾ ¡¡¡¡¡¡£¼td bgcolor="#e5e5e5" align="right"£¾£¼b£¾Email£º£¼/b£¾£¼/td£¾ ¡¡¡¡¡¡£¼td£¾£¼input type="text" name="txtEmail" size="25" class="input" value="£¼%=CheckStrOutput(objPerson.Email)%£¾"£¾£¼/td£¾ ¡¡¡¡£¼/tr£¾ ¡¡¡¡£¼tr bgcolor="#ffffff"£¾ ¡¡¡¡¡¡£¼td bgcolor="#e5e5e5" align="right"£¾£¼b£¾QQ£º£¼/b£¾£¼/td£¾ ¡¡¡¡¡¡£¼td£¾£¼input type="text" name="txtQQ" size="25" class="input" value="£¼%=CheckStrOutput(objPerson.QQ)%£¾"£¾£¼/td£¾ ¡¡¡¡£¼/tr£¾ ¡¡¡¡£¼tr bgcolor="#ffffff"£¾ ¡¡¡¡¡¡£¼td bgcolor="#e5e5e5" align="right"£¾£¼b£¾ËùÔÚ¹«Ë¾£º£¼/b£¾£¼/td£¾ ¡¡¡¡¡¡£¼td£¾£¼input type="text" name="txtCompany" size="25" class="input" value="£¼%=CheckStrOutput(objPerson.Company)%£¾"£¾£¼/td£¾ ¡¡¡¡£¼/tr£¾ ¡¡£¼/table£¾ ¡¡£¼br£¾ ¡¡£¼div align="center"£¾ ¡¡£¼input type="submit" name="btnOk" value="Ìá½»"£¾ ¡¡£¼input type="button" name="btnClose" value="¹Ø±Õ" onclick="javascript:return window.close();"£¾ ¡¡£¼/div£¾ £¼/form£¾ £¼/BODY£¾ £¼/HTML£¾ £¼% Set objPerson = Nothing %£¾

¡¡¡¡Æß¡¢×ܽá

£ £ µ½´Ë£¬ÎÒÃǵÄÁªÏµÐÅÏ¢¹ÜÀí³ÌÐò¾Í´ó¹¦¸æ³ÉÁË¡£ÔõôÑù£¬¸Ð¾õÈçºÎ£¬Ó¦¸ÃÀ´Ëµ»¹ÊÇÏ൱¼òµ¥µÄ°É¡£µ±È»ÁË£¬Õâ¸öÀý³Ì»¹ÓÐÐí¶à¿ÉÒԸĽøµÄµØ·½£¬ÎÒÕâÀïÒ²Ö»²»¹ýÊÇÅ×שÒýÓñ£¬Ï£Íû¶ÁÕßÔÚÕÆÎÕÁËXML±à³ÌÖ®ºó£¬×ÔÐÐÐÞ¸ÄÍêÉÆ°É¡£

£ £ ´ËÀý³ÌÒѾ­ÔÚÎÒ±¾»ú£¨Windows Server 2000¡¢IIS5.0ºÍIE6.0£©ºÍÍøÉϽøÐÐÁ˲âÊÔ£¬¶¼Äܹ»Õý³£ÔËÐС£

¡¡µã»÷ÏÂÔر¾ÎÄÔ´´úÂë

Ïà¹ØÔĶÁ MacºÍWindowsÄĸöºÃ windowsºÍmac os¶Ô±È½éÉÜWin10Ô¤ÀÀ°æÔõôÉý¼¶ Win10Ô¤ÀÀ°æÉý¼¶·½·¨³§É̲»ÔÙԤװWin7»ò8.1ϵͳ£¬Çý¶¯ÈËÉú°ïÄú¿ìËÙÉý¼¶MacÒƶ¯Ó²ÅÌ°²×°win8 Mac½«win×°ÔÚÒƶ¯Ó²ÅÌʹÓý̳Ìwindows10xboxone´®Á÷¼òµ¥½Ì³ÌWindows HelloÔõôÓà Windows HelloʹÓÃÉèÖý̳Ìwin10Ôõô¹Ø±Õ×Ô¶¯¸üРwin10ÈçºÎ¹Ø±Õ×Ô¶¯¸üÐÂMacϵͳÈçºÎÔ¶³Ì×ÀÃæµ½Windowsϵͳ

ÎÄÕÂÆÀÂÛ

²é¿´ËùÓÐ0ÌõÆÀÂÛ>>

·¢±íÆÀÂÛ

ÎÒÀ´ËµÁ½¾ä...

Ìá½»ÆÀÂÛ