%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DSN=cto; UID=GalleryUser; PWD=milton1017; Database=db1"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.CursorLocation = 3
news_id=Request("news_id")
sql = "SELECT a.NEWS_ID, a.SUBJECT, a.CONTENT, a.POST_DATE, a.END_DATE, a.NEW, a.STATION AS STATION_ID, a.FILE1, a.FILE2, a.FILE_TXT, a.FILE3, a.FILE3_TXT, "
sql = sql & " a.SORT, b.STATION FROM NEWS a, STATION b "
sql =sql & " WHERE a.STATION=b.STATION_ID AND a.NEWS_ID='"&news_id&"'"
rs.Open sql, conn, 3, 2
%>
經濟部中部辦公室