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
Ïà¹ØÎÊ´ð£º
ÎÒÃÇÓÐÒ»¸öÍøÕ¾Ä£°å£¬www.c111.com.cn,Ï£ÍûÐÞ¸ÄһЩµØ·½£º
1£©µã»÷×ó²à¡°·þÎñÆ·ÅÆ¡±µÄÆäÖÐÒ»¸öС·ÖÀ࣬Èç¡°×ãÇò¡±£¬½çÃæµÄÓÒ²à¾Í³öÏÖÈçwww.c111.com.cn/1.jpg£¬µã»÷1.jpgÉÏ·½µÄÆäÖÐÒ»¸öÆ·ÅÆlogo£¬ÏÂÃæ¾Í³öÏÖÏà¹ØµÄÍ ......
<%if request.QueryString("start") <>"" then%>
<%if cint(start)>0 then%>
<a href="search.asp?q= <%=q%>&start= <%if request.Query ......
ÀûÓÃaspÀ´µ¼³öÎļþµ½excel£¬²»ÐèÒªoffice×é¼þ£¬ÈçºÎ×ö£¿Ð»Ð»£¡ÄÜÌṩ¸ö²Î¿¼µÄÍøÖ·¡£¡£
http://www.mscto.com/aspnet/2009021435632.html
Â¥Éϵģ¬ÎÒ²»ÐèÒªÓÃowc£¬´ïµ½µ¼³öµ½excelµÄ¹¦ÄÜ£¬²¢ÇÒÄÜͨ¹ý´úÂëÀ´×Ô¶¨Òå ......
Îļþ£ºfolder.inc
HTML code:
<%
Dim folderini,pos,pageName
fPath = Request.ServerVariables("PATH_TRANSLATED")
pos = instrRev(fPath,"\")
folderini = Left(fPath,pos)+&qu ......
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xht ......