<% SUB pageUrl(pUrl) Dim eUrl txts = Request.ServerVariables("URL") txts = left(txts,instrrev(txts,"/",len(txts))-1) eUrl = "http://" & Request.ServerVariables("server_name") & txts For i =1 to allpages txt = "" txt = "" txt = txt & "" if i = Cint(Page) then txt = txt & "" txt = txt & (i) if i = Cint(Page) then txt = txt & "" txt = txt & " // " Response.Write(txt) Next END sub %> <% classs=request("classs") q_submit=request("q_submit") q_date=request("q_date") q_keyword=request("q_keyword") if classs="" then sql1="select * from jianzhiinfo where isshow=1" sql2="select * from jianzhiinfo where isshow=1 and (datediff(m,date1,getdate())=0)" sql3="select * from jianzhiinfo where isshow=1 and (datediff(d,date1,getdate())=0)" else sql1="select * from jianzhiinfo where isshow=1 and (classs = '" & classs & "')" sql2="select * from jianzhiinfo where isshow=1 and (classs = '" & classs & "') and (datediff(m,date1,getdate())=0)" sql3="select * from jianzhiinfo where isshow=1 and (classs = '" & classs & "') and (datediff(d,date1,getdate())=0)" end if 'response.write "sql1=" & sql1 & "
" 'response.write "sql2=" & sql2 & "
" 'response.write "sql3=" & sql3 & "
" 'temp=datediff("d","2006-04-12",now()) 'response.write "temp=" & temp & "
" 'response.end set rs=server.createobject("adodb.recordset") rs.open sql1,conn,1,1 total_numer = rs.recordcount rs.close rs.open sql2,conn,1,1 month_numer = rs.recordcount rs.close rs.open sql3,conn,1,1 today_numer = rs.recordcount rs.close set rs=nothing 'response.end %>
上海大学生兼职网－交通示意图

[交通路线推荐]

　路线一：乘坐轨道交通三号线，到[赤峰路站]下车，到玉田路乘坐115、817到[密云路站]下，沿赤峰路向前百米即赤峰路65号同济科技园大楼。

　路线二：乘坐轨道交通三号线，到[赤峰路轻轨站]下车，沿赤峰路向东步行一刻钟，即可达到赤峰路65号同济科技园大楼。

　路线三：从人民广场乘坐123路公交，到[巴士一汽站]下车，沿赤峰路向西步行一百米，对面即是赤峰路65号同济科技园大楼。

　路线四：从长宁区一带，乘坐829路公交，到[赤峰路站]下车，沿赤峰路向东步行三百米，即是赤峰路65号同济科技园大楼。

　路线五：从浦东新区，乘坐746、576路公交，到[巴士一汽站]下车，沿赤峰路向西步行一百米，对面即是赤峰路65号同济科技园大楼。

　路线六：从上海火车站北广场，乘坐115、515、817路公交，到[密云路站]下，沿赤峰路向前百米即赤峰路65号同济科技园大楼。


地址：上海市杨浦区赤峰路65号同济科技园210室（同济大学国家大学科技园）

电话：021-5977569 65989051 非工作时间：15921404016
Copyright 2007-2010. 上海大学生兼职网 shdxs .com