<% @Language = Vbscript %> <% Response.Buffer = True sAction = Request.QueryString("Show") sID = Request.QueryString("ID") Main Sub Main %> Choose A Course To Study - From General English to Cambridge Examinations at Rose of York English Language School in London


Study English in London
Communication is Learning

  About
  Us		   Courses

  Our
  Staff

   Student
  Opinion		   News &
  Events		   Photo
  Gallery		   Agents   Other
  Services		   Enrol
  Now		   Finding
  Us		   Contact
  Us		   Sitemap &
  Index
 General English | Examination Courses | Business Courses | Private Lessons | Internship | Other Languages

 You are here: courses

Private Lessons

 

1 to 1 Private Lessons

 

Saturday 1 to 1 Private Lessons

 



Languages
© 2007 Rose Of York Ltd
info@roseofyork.co.uk
Site Design London Web Designers

  •  

    <% End Sub Sub ShowCategories Dim objConn, objRS, strSQL, iCount, iCountMod ' Opretter forbindelse til databasen Set objConn = Server.CreateObject("ADODB.Connection") objConn.Open Session("dbDSN") ' Opbygger SQL sætning strSQL = "SELECT * FROM Categories WHERE Status = 'ACT' " Set objRS = objConn.Execute(strSQL) ' iCountMod skal bruges til at starte en tømning af bufferen (sker når der er mange poster i databasen) iCountMod = 0 ' Udskriver alle poster i databasen Do While Not objRS.EOF iCountMod = iCountMod+1 %>