安丘兴农网

<%function getDataIp() dim ip ip=Request.ServerVariables("REMOTE_ADDR") if (left(ip,6)="80.0.0" or left(ip,6)="60.0.0" or left(ip,10)="172.18.200" or ip="127.0.0.1" or ip="218.104.5.50") then getDataIP="80.0.0.3" else getDataIP="221.214.14.188" end if end function %> 安丘兴农网


			\|安丘概况 \| 兴农快讯 \| 市场行情 \| 农业科技 \| 安丘特色 \| 招商引资 \| 气象服务	<%=formatdatetime(now,vblongdate)%> <%=weekdayname(weekday(now))%>

<% set weather=server.CreateObject("scripting.filesystemobject") set content=weather.opentextfile(server.mappath("forcast.txt")) response.write(content.readall) content.close set weather=nothing %>

价格行情

<%sub query2table(inputquery) set conn=server.createobject("ADODB.connection") conn.open("Provider=SQLOLEDB.1;Server=80.0.0.14;Database=sdxnw;UID=sdxnwread;pwd=read;") set rstemp=conn.execute(inputquery) howmanyfields=rstemp.fields.count -1 %> 　　 <%do while not rstemp.eof%> <% for i = 0 to howmanyfields thisvalue=rstemp(i) If isnull(thisvalue) then thisvalue="" end if %> <%next%> <%rstemp.movenext loop %>

<%=thisvalue%>

<% rstemp.close set rstemp=nothing conn.close set conn=nothing end sub %> <%call query2table("select substring(name,1,4),price,units,substring(lxfs,1,5),substring(dates,6,5) from SCXX_price where cityid='28' and types='农副产品' order by dates desc") %>

供求热线

<%sub query3table(inputquery) set conn1=server.createobject("ADODB.connection") conn1.open("Provider=SQLOLEDB.1;Server=80.0.0.14;Database=sdxnw;UID=sdxnwread;pwd=read;") set rstemp1=conn1.execute(inputquery) %> <%do while not rstemp1.eof%> <% for i = 0 to 1 thisvalue=trim(rstemp1(i)) If isnull(thisvalue) then thisvalue="" end if if thisvalue="供" then thisvalue="供" end if if thisvalue="求" then thisvalue="求" end if %> <%next%> <%rstemp1.movenext loop %>

"><%=thisvalue%>

<% rstemp1.close set rstemp1=nothing conn1.close set conn1=nothing end sub %> <%call query3table("select top 3 substring(titel,1,18),typeid,id from SCXX_sale order by dates desc,id desc") %>

兴农快讯

安丘农产品加工凭借"市场细分"走出无序竞争

安丘大姜寻求地理标志产品保护

生态建设拉动安丘经济

“山东十大杰出青年”颁奖安丘市公安局党委书记、局长聂作坤当选

农业技术

·芦荟养殖种植技术

用户:
口令:

会员链接

.政策法规	.知名企业	.招商引资
中华人民共和国气象法人工影响天气管理条例施放气球管理办法《山东省防御和减轻雷电灾害管理规定》	安丘外贸食品有限公司 :::. 安丘奥宝化工集团有限公司 :::. 大江集团 :::. 山东景芝洒业股份有限公司 :::. 安丘惠利食品有限公司 :::.	招商项目 .农业及工业项目 .城北区招商 .农业综合开发项目招商政策 .安丘市人民政府关于进一步鼓励外商投资的暂行规定 .投资重点及方向