<%@ LANGUAGE="VBSCRIPT" %> <% 'CATA Database School List Retrival Name = Request.Form("Name") School = Request.Form("School") City = Request.Form("City") Region = Request.Form("Region") LocType = Request.Form("Type") Sort = Request.Form("Sort") Format = Request.Form("Format") Set ObjConn = Server.CreateObject("ADODB.Connection") ObjConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=e:\calaged\databases\aged.mdb") Set ObjRst = Server.CreateObject("ADODB.RecordSet") SaveID=0 ' saved location ID SaveRegionID = 0 %> CATA Code of Ethics
Code of Ethics
  • I am proud of my profession.
  • I shall conduct myself with dignity and in a professional manner.
  • I shall endeavor to grow and develop in my profession.
  • I shall work in harmony with school authorities and other teachers of the school.
  • I shall take an active part in school and community life.
  • I shall work for the advancement of Agriculture and promote agricultural education.
  • I shall be patient, honest and fair in my dealings.
  • I shall treat others with dignity and respect.
  • I shall strive to set before my students, by example, the highest standards of citizenship.
  • I shall give of myself that each of my students may be inspired to make his future life more full and productive.