<%
Dim SQL01
Dim objRecordset01
Dim article_id
Set objRecordset01 = Server.CreateObject("ADODB.Recordset")
SQL01 = "select article_title, article_detail from dbo.broadway_article where category_id = 4"
objRecordset01.Open SQL01, broadwayDSN, adOpenKeyset, adLockPessimistic, adCmdText
%>