dephi ºÍvb¡¢cÓÐʲô²»Í¬£¬Ñ§ÄǸöºÃ£¿
1.ÊDZàÒëÖ´Ðеģ¿
2.¿ÉÒÔÖ´Ðлã±àÂð£¿
3.¿ÉÒÔÖ±½Ó·ÃÎÊ´®¿Ú¡¢´òÓ¡¿ÚÂð
ÏëÔÙѧ¸öеģ¬¸øÌáµã½¨Òé¡£
ÏÈлÁË£¿
¸÷Óи÷µÄÌØÉ«,ÔÚÄã×Ô¼ºÁË
ÒýÓÃ
dephi ºÍvb¡¢cÓÐʲô²»Í¬£¬Ñ§ÄǸöºÃ£¿
ȷʵÓкܴóµÄ²»Í¬£¬²»ÄÜÓü¸¾ä»°ËµÇå³þ¡£¶øÇÒÿ¸öÈ˵ÄÀí½â¶¼²»Ò»Ñù¡£Ñ§ÄÄ ......
ÎÒÓÃ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.CreatoObj ......
ÔÚ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 M ......
ÔÚaspÍøÒ³ÉÏÓã¬ÈçºÎ×öÕâôһÖֿؼþ£¬Á¬½Ó·þÎñÆ÷Êý¾Ý£¬¶ÁÈ¡ÏàÓ¦¶Î£¨ÆäʵÊÇVBS½Å±¾£©²¢Ö´ÐУ¬ÒÔʵÏÖ×Ô¶¯Ìî±í¹¦ÄÜ¡£
¾ßÌåÈ磺¡¡asp ÉÏÓÐÒ»¸ö onclik="open(id)"£¬¿Ø¼þ¸ú¾Ý¡¡id,ºÍÓû§seesionÖµ¡¡Á¬½Ó·þÎñÆ÷Êý¾Ý¿âÈ¡µÃ´úÂë²¢Ö´ÐС£
°ï¶¥
ÒýÓÃ
lzÒªÃ÷°×2Ñù¶«Î÷£¬httpºÍhtml
aspÖ»ÊÇ·þÎñÆ÷¶ËµÄhtml ......
ÔÚ×öÊ÷ÐÍĿ¼ʱ³öÏֵģ¬ÒÔÏÂÊDz¿·Ö´úÂë
VB code:
Function TreeMenu(id)
sql = "select * from Class where CateID=1"
rs.Open sql, cover, 1, 1
While Not rs.EOF
Response.Write rs("Name")
TreeMenu (rs("id"))
rs.MoveNext
Wend
rs.Close
End Function
ÏÖÔ ......
ÎÒÓг§¼Ò×öµÄASPµÄ¼à¿Ø¼Ïñ£¨DVR£©µÄ¾ÖÓòÍø²¥·ÅµÄÔ´³ÌÐòÓë¿Ø¼þ£¬ÏëÒªÓÃASP.net×öÒ»¸öÊÓƵ»Ø·ÅµÄ³ÌÐò£¨ÀûÓÃËûµÄ¿Ø¼þ£©µ«²»ÖªÈçÏÂÈ¥×ö£¬Íû¸÷λָµã¡£
ÏȸãÇå³þËûÃǵĿؼþÊÇÔõôÓõÄ,
È»ºó¾ÍÖ±½ÓÓúÃÁË.
²»¹ý,Èç¹ûÒѾÓмºÃÏñµÄ¶«Î÷ÁË,Ò²¿ÉÒÔ²»ÓÃËûÃǵĿؼþÀ´×ö°¡,Ö±½Ó·Å²»ÊǾͿÉÒÔÁËô.
ÔÚasp.netÖе÷Óÿؼþ, ¿Éʹ ......