%
dim rst
dim rstClass
columnID=Request("ColumnID")
classID=Request("ClassID")
set rst=Server.CreateObject("Adodb.Recordset")
set rstClass=Server.CreateObject("Adodb.Recordset")
set rstNews=Server.CreateObject("Adodb.Recordset")
set rstNewsC=Server.CreateObject("Adodb.Recordset")
sql="SELECT * FROM NewsColumn WHERE N_ColumnID=" & ColumnID
rstNewsC.LockType=3
rstNewsC.Open sql,conn
className=rstNewsC("N_Column")
%>