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

[¼¼ÊõÉ¢·Ö]ASPµ÷ÓÃVB±àдµÄ×é¼þ

ÔÚVB°´MVCµÄ¹¹¼Üд×é¼þ¹©ASPµ÷ÓÃ
BLL²ã


VB code:

Private Dal As New moonPotato_DAL
Public Sub inSertUser(Model As moonPotato_Model)
Dal.InSertCls (Model)
End Sub




ASPÖе÷ÓÃ

VB code:

Set BLL = server.CreatoObject("tttt.moonPotato_BLL")
Set Model= server.CreatoObject("tttt.moonPotato_Model")
Model.userName="123"
Model.userLevel="456"
BLL.inSertUser(Model)




ÕâÑù¾ÍÌá¶ÔÏó²»Ö§³Ö¸ÃÊôÐÔ»ò·½·¨,ÎÊÌâÖ¸ÏòDal.InSertCls (Model)£¬ÔÚASPÖе¥¶ÀÔËÐÐDal.InSertClsûÓÐÎÊÌâ
Èç¹û°ÑÒÔÉÏBLL²¿·ÖÖ±½ÓдÔÚASPÖоÍÕý¿ÉÕý³£Ö´ÐУ¬ÕâÊÇʲôԭ¶÷


ÎÊÌâÊÇDal.InSertCls (Model)¸Ä³ÉÕâÑù¾ÍDal.InSertCls Model OK
¿´À´£¨£©Äܲ»ÓþͲ»Óá£VBµÄÓ﷨ȷʵ²»Ì«¹æ·¶£¬ÖÐÎç½áÌù¡£



ÈçÐèÒªÔĶÁ¸Ã»Ø¸´£¬ÇëµÇ¼»ò×¢²áCSDN!




Ïà¹ØÎÊ´ð£º

ASP¼òµ¥ÎÊÌâ

conn.asp

<%
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&server.MapPath("Connt ......

ÎÒÏë×öÒ»¸öaspÍøÕ¾£¬µ«ÊDz»ÖªµÀ×öʲô£¡

×î½üÎÒͨ¹ýѧϰ£¬¸Ð¾õ×Ô¼ºÑ§µÄ»¹¿ÉÒÔÁË£¬Ïë×öÒ»ÍøÕ¾£¬µ«ÊÇÒ»Ö±¶¼ÕÒ²»µ½Ìâ²Ä£¬²»ÖªµÀ×öʲô£¬Ï£Íû¸÷λ¸øÎÒµãÒâ¼û£¬Èç¹ûÓÐÐèÇóÎĵµ¾Í¸üºÃÁË£¡Ï£Íû´ó¼Ò¸øÎÒµãÒâ¼û£¬Ð»Ð»£¡
ÏÈ×ö¸öÆóÒµÍøÕ¾°É£¬ÎҸоõÒ»¸öÈË×öÍøÕ¾²»ÊÊÒË ......

aspÍøÕ¾Ä¿Â¼ÒÆ¶¯ºó²»ÄÜÉÏ´«Îļþ£¬Çó¾È

ÎʸöÎÊÌ⣬ÎÒµÄÒ»¸öÍøÕ¾ÄÜÉÏ´«Îļþ£¬ÎÒ°ÑÍøÕ¾Ä¿Â¼¿¼µ½Í¬Ò»Ì¨µçÄÔµÄÁíÒ»¸öĿ¼Ï£¬È»ºóÔÚ¸´ÖƹýÀ´µÄĿ¼ÉÏн¨ÁËÒ»¸öÍøÕ¾£¬³ÌÐòÎļþû¶¯(Ïà¹ØÂ·¾¶µÄÉèÖÃÒѾ­¸ÄÁË£¬²»ÊÇ·¾¶ÎÊÌâ)£¬µ«ÊÇÐÂÍøÕ¾²»ÄÜÉÏ´«Îļþ£¬ÎÒÍøÉϲéÁË ......

ASPÊÇÔõÑùÅжÏÒ»¸öÓû§ÊÇ·ñÁ¬½ÓµÄÄØ

ÎÒÔÚÒ»¸öä¯ÀÀÆ÷Àï,ÓõÚÒ»¸öÓû§µÇ¼ÁËÒ»¸öÍøÕ¾,È»ºóµã"Í˳öµÇ¼",È»ºóÓÖÓõڶþ¸öÓû§µÇ¼ÁËÕâ¸öÍøÕ¾,ÔÙµã"Í˳ö"

×¥°ü¿´µ½µÄ½á¹ûÊÇ,µÚÒ»´Î·¢Ë͵ÄPOSTÇëÇóÖÐ,httpÍ·²¿Ã»ÓдøCOOKIE×Ö¶Î,·þÎ ......

[¸ß·ÖÇóÖú]°ïæתÏ´úÂë(ASP(VBSCRIPT) TO C#)лл~!

function mistake(preString)
      Dim texts
      Dim seed
      Dim i,length
      prestring = trim(preString)
    ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ