ASPÅжÏÎÊÌâ¡£
HTML code:
sql = "select top 1 * from cm_info where lm2='"&lm2&"' and (name='"&Request("name")&"' or haoma='"&Request("haoma")&"' or fenji='"&Request("fenji")&"')"
'response.write sql
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open sql,conn,1,2
if not(rs.bof and rs.eof) then
goexit "1.»úÖ÷Ãû»òÊÖ»úºÅÒÑ´æÔÚ;\n\n2.·Ö»úʶ±ðÂëÖØ¸´;\n\n¶Ô²»Æð£¬Çë·µ»ØÖØÌ"
response.end
end if
rs.addnew
¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£
ÉÏÃæwhereµÄÌõ¼þ£¬ÎÒÏë·Åµ½ÏÂÃæÀ´£¬²»ÔÚÓï¾äÀïÅжϣ¬Óï·¨ÊÇʲôÑùµÄ£¨Â鷳д³öÀ´£©
ÓÃÕâ¸öÌá½»Ò³ÃæµÄÓжà¸öµØ·½£¬¶¼Í¬ÓÃÕâÒ»Ò³£¬ÁíÍâÓеĵط½²»ÐèÒªÑéÖ¤nameÖØ¸´£¬ÎÒ¸ÃÔõôд£¿Â鷳Ҳд³öÀ´¡£
°Ñ(name='"&Request("name")&"'È¥µô²»¾ÍºÃÁË¡£¡£¡£»¹ÊÇÎÒÀí½â´íÁË£¿
sql = "select top 1 * from cm_info where lm2='"&lm2&"' and haoma='"&Request("haoma")&"' or fenji='"&Request("fenji")&"')"
'response.write sql
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open sql,conn,1,2
if not(rs.bof and rs.eof) then
goexit &qu
Ïà¹ØÎÊ´ð£º
<%On Error Resume Next
Set conn=Server.CreateObject("ADODB.Connection")
conn.begintrans
conn.Open ("Driver={SQL Server};server=(local);uid=sa;database=student;pwd=")
......
ÀûÓÃaspÀ´µ¼³öÎļþµ½excel£¬²»ÐèÒªoffice×é¼þ£¬ÈçºÎ×ö£¿Ð»Ð»£¡ÄÜÌṩ¸ö²Î¿¼µÄÍøÖ·¡£¡£
http://www.mscto.com/aspnet/2009021435632.html
Â¥Éϵģ¬ÎÒ²»ÐèÒªÓÃowc£¬´ïµ½µ¼³öµ½excelµÄ¹¦ÄÜ£¬²¢ÇÒÄÜͨ¹ý´úÂëÀ´×Ô¶¨Òå ......
Õâ¸ö³ÌÐòÊǶÁ´óһʱѧCÓïÑÔÎÒ×Ô¼ºÏë³öµÄ£¬ÀÏʦֱ¿äÎÒ´ÏÃ÷£¬ÏÖÔÚÓÃASP¸ÄдÁË£¬´ó¼ÒÖªµÀÔËÐнá¹ûÂð
<table width="486" border="1" cellpadding="0" cellspacing="1"& ......
½¨ÁËÒ»¸öÕ¾µã£¬ÀïÃæÓÐ login.aspx. events.aspx µÈµÈ ÆäËûµÄÒ³Ãæ¡£
µ«ÊÇÎÒµ÷ÊÔ ÆäËûÒ³ÃæµÄʱºò£¬±Ä³öÀ´µÄ×ÜÊÇ login.aspx Ò³Ãæ¡£
¸Õѧasp ÇëÖ¸½Ì
ÄãÉèÖÃÆðʼҳÁ˰ɡ£¡£
¶÷ÔõôȡÏûÄØ£¿
Òªµ ......
<%set rs=server.CreateObject("Adodb.recordset")
rs.open "select * from zs_news where m_classid="&classid&" order by m_id desc",conn,1,1
......