Taipei Online 台北線上

<% SQL = "Select * From data where 新店快報='yes' and 上架='yes'" set rs=getmdbstaticrecordset("tpdata.mdb",SQL) SQL = "Select * From data where 商家特寫='yes' and 上架='yes' " set rs1=getmdbstaticrecordset("tpdata.mdb",SQL) SQL = "Select * From data where 行家推薦='yes' and 上架='yes' " set rs2=getmdbstaticrecordset("tpdata.mdb",SQL) SQL = "Select * From news" set news=GetMdbRecordset("news.mdb",SQL) %> Taipei Online 台北線上

<%news.movenext%>

" target="<%=news("視窗")%>"><%=news("標題")%>

" target="<%=("視窗")%>"><%=news("標題")%>

免費登錄　頭家看這裡

<% login=Session("login") if login <> "Passed" then %>

帳號
密碼

忘記密碼?
立即加入會員

<% else UserID=Session("UserID") SQL = "Select * From member Where UserID='" & UserID & "'" Set mb = GetMdbRecordset( "tpmember.mdb", SQL ) %>

<%=mb("姓名")%>，您好

| 會員福利社 | 登出|

<% end if %>

<% a=0 while not rs.eof a=a+1 rs.movenext wend randomize b=fix(rnd*a)+1 rs.absoluteposition=b %>

&style=<%=rs("版型")%>&kind=<%=rs("商店類別")%>">

" width="151" height="112" border="0">

<%=rs("商店名稱")%>

<%=left(rs("介紹一"),60)%>......

&style=<%=rs("版型")%>&kind=<%=rs("商店類別")%>">

訪客人數：<%=kjFileCounter("counter.txt")%>

<% a=0 while not rs1.eof a=a+1 rs1.movenext wend randomize b=fix(rnd*a)+1 rs1.absoluteposition=b %> <%rs1.absoluteposition=b+1 if rs1.eof then rs1.absoluteposition=1 %> <%rs1.absoluteposition=b+2 if rs1.eof then rs1.absoluteposition=2 %> <%rs1.absoluteposition=b+3 if rs1.eof then rs1.absoluteposition=3 %> <%rs1.absoluteposition=b+4 if rs1.eof then rs1.absoluteposition=4 %>

<%=rs1("商店名稱")%>

&style=<%=rs1("版型")%>&kind=<%=rs1("商店類別")%>">

" width="79" height="53" hspace="3" vspace="3" border="0" align="left"><%=left(rs1("介紹一"),70)%>...

<%=rs1("商店名稱")%>

&style=<%=rs1("版型")%>&kind=<%=rs1("商店類別")%>">

" width="79" height="53" hspace="3" vspace="3" border="0" align="left"><%=left(rs1("介紹一"),70)%>...

<%=rs1("商店名稱")%>

&style=<%=rs1("版型")%>&kind=<%=rs1("商店類別")%>">

" width="79" height="53" hspace="3" vspace="3" border="0" align="left"><%=left(rs1("介紹一"),70)%>...

<%=rs1("商店名稱")%>

&style=<%=rs1("版型")%>&kind=<%=rs1("商店類別")%>">

" width="79" height="53" hspace="3" vspace="3" border="0" align="left"><%=left(rs1("介紹一"),70)%>...

<%=rs1("商店名稱")%>

&style=<%=rs1("版型")%>&kind=<%=rs1("商店類別")%>">

" width="79" height="53" hspace="3" vspace="3" border="0" align="left"><%=left(rs1("介紹一"),70)%>...

臺北市政府	罰單資訊	大眾運輸查詢	台北市即時路況
市民九大生活網	公益彩券	台灣電子地圖	北市違規拖吊查詢系統
市民終身學習網	統一發票	火車時刻表	北市交通大隊路霸檢舉
電子公路監理網	郵遞區號	天氣預測	臺北市政府勞工局
臺北市政府警察局	台北捷運

台北線上電子報