<% theparameter1="ratesLogin.asp?hiddenfield=''" 'Response.Redirect "UnderConstruction.htm" theparameter2="localticker3" 'response.write theparameter1 'response.write theparameter2 'Verify_Session theparameter1,theparameter2 %> Taurus Live KSE Market Screen
<% Set ConnTaurus = Server.CreateObject("ADODB.Connection") ConnTaurus.Open Application("ConnLivequotes_ConnectionString") 'set rs=Server.CreateObject("ADODB.Recordset") set rs= conntaurus.execute ("select * from changedcompanystatus") while not rs.eof %> <% rs.movenext wend rs.close conntaurus.close %>
<%=rs("CompanyName")%> > <%=rs("NewName")%>