<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Option Explicit %> <% response.charset="utf-8" %> <% dim rs,sql,SiteTitle,SiteUrl,ComName,Address,ZipCode,Telephone,Fax,Email,Keywords,Descriptions,IcpNumber,MesViewFlag set rs = server.createobject("adodb.recordset") sql="select top 1 * from NwebCn_Site" rs.open sql,conn,1,1 SiteTitle=rs("SiteTitle") SiteUrl=rs("SiteUrl") ComName=rs("ComName") Address=rs("Address") ZipCode=rs("ZipCode") Telephone=rs("Telephone") Fax=rs("Fax") Email=rs("Email") Keywords=rs("Keywords") Descriptions=rs("Descriptions") IcpNumber=rs("IcpNumber") MesViewFlag=rs("MesViewFlag") rs.close set rs=nothing %> <% =SiteTitle %>
首 页　|　农家简介　|　周边景点　|　交通路线　|　客房设施　|　农家特色　|　网站留言　|　联系我们
 
玉米
南瓜
特色南瓜
黄瓜
番茄
绿色农家菜