<% ConnectionString = "Provider=SQLOLEDB;Data Source=sql60.enterhost.com;Initial Catalog=BA321;user ID=BA321;password=walkerhilladm90 ;" Set GetDBConn = Server.CreateObject("ADODB.Connection") GetDBConn.Open(ConnectionString) num = Request("num") If Request("num")="" Then num=24 Else num = Request("num") End If Nick_Name = Request("Nick_Name") Set List = Server.CreateObject("ADODB.Recordset") List.Open "SELECT * FROM E_Member where num=" & num & " ORDER BY num ASC", GetDBConn, 1 %>

"> ">