<% set conn=Server.CreateObject("ADODB.Connection") conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open(Server.Mappath("/users/khosravi/icelvideo.mdb")) set rs = Server.CreateObject("ADODB.recordset") rs.Open "SELECT * FROM akhbar order by number desc", conn %>

آموزش از راه دور تلويزيون باران

بیننده گرامی:

از آنجايي که دوره های آموزشی راديو و تلويزيون باران بر اساس سیستمی طراحی شده است که علاقمندان می توانند از تمامی دوره ها بصورت آزاد و رايگان بهره مند شوند و بدین منظور به قسمت برنامه های آموزشی راديويي و تلويزيوني باران مراجعه نمايند، اما در صورتی که مایل باشید تا ضمن تحصیل در این دوره ها گواهینامه معتبر مرکز اسلامی انگلیس(عضو مشورتی شورای اجتماعی و اقتصادی NGO  ها در سازمان ملل متحد) را نیز دریافت نمایید لازم است تا ابتدا فرمی را که بمنظور ثبت نام شما طراحی شده است را تکمیل و برای ما ارسال نمائید. بدیهی است که پس از انجام پذیرش قطعی شما و طی دوره های آموزش از راه دور، سپس مبتنی بر تقویم امتحانات، در آزمون های ما شرکت نموده و در نهایت به دریافت گواهینامه پایان دوره نایل خواهید شد.

لطفا جهت اطلاع از تقویم آموزشی و نام دوره هایی که شامل این ضوابط می شوند، بر روی گزینه مربوطه کلیک کنید و در صورت تمایل به ثبت نام به قسمتی که برای این منظور در اختیار شما قرار دارد مراجعه فرمائيد.

مدیریت آموزش از راه دور رادیو و تلویزیون باران

<% set conn=Server.CreateObject("ADODB.Connection") conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open(Server.Mappath("/users/radio/icelvideo.mdb")) set rs = Server.CreateObject("ADODB.recordset") rs.Open "SELECT * FROM tvf WHERE ID = 1", conn do while NOT rs.EOF f= rs.Fields("visits") +1 rs.MoveNext loop rs.close conn.close set conn=Server.CreateObject("ADODB.Connection") conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open(Server.Mappath("/users/radio/icelvideo.mdb")) sql="UPDATE tvf SET visits='" & f & "'" conn.Execute sql conn.close %>