<%@LANGUAGE="VBSCRIPT" %> <%Response.Buffer=True%> Cursuri online pentru incepatori si profesionisti - CursuriOnline.ro :: Lista cursuri
sigla cursuri online
Nume utilizator
Parolă
Cursuri online <% msql ="SELECT * FROM CourseDescription WHERE Code <> ""Demo"" ORDER By CourseCategory, CourseTitle ASC" Set RS=MyConn.Execute(msql) Dim Coloralt%> <%If Not RS.BOF Then Coloralt="#EEEAE8" While Not RS.EOF Do While Not RS.EOF courseprice = RS("CoursePrice") * 3.6 Response.Write("") Response.Write("") Response.Write("") Response.Write("") Response.Write("") Response.Write("") Response.Write("") RS.MoveNext ' This bit of code makes the colors alternate If Coloralt="#EEEAE8" Then Coloralt="#FFFFFF" 'This belongs to the alternative Colores Else 'This belongs to the alternative Colores Coloralt="#EEEAE8" 'This belongs to the alternative Colores End If 'This belongs to the alternative Colores Loop Wend End If %>
Titlul cursului
Autorul cursului
Categorie
Preț (RON)
Formular Înscriere
" & RS("CourseCategory") & "
" & courseprice & "
<%RS.Close MyConn.Close Set RS = Nothing Set MyConn = Nothing %>