BuildexOnline>>>

<%@LANGUAGE="VBSCRIPT"%> <% ' *** Edit Operations: declare variables MM_editAction = CStr(Request("URL")) If (Request.QueryString <> "") Then MM_editAction = MM_editAction & "?" & Request.QueryString End If ' boolean to abort record edit MM_abortEdit = false ' query string to execute MM_editQuery = "" %> <% ' *** Insert Record: set variables If (CStr(Request("MM_insert")) <> "") Then MM_editConnection = MM_buildex_work_STRING MM_editTable = "training" MM_editRedirectUrl = "works_thankpg1.htm" MM_fieldsStr = "year_study|value|section|value|rate|value|pc_programs|value|email|value|name|value|born_date|value|address|value|phone|value|family|value|language|value|skills|value|in_date|value" MM_columnsStr = "studying_year|',none,''|specialty|',none,''|rate|',none,''|pc_skills|',none,''|emai|',none,''|name|',none,''|born_date|',none,''|home_city|',none,''|phone|',none,''|social_state|',none,''|language|',none,''|language_good|',none,''|today_date|',none,''" ' create the MM_fields and MM_columns arrays MM_fields = Split(MM_fieldsStr, "|") MM_columns = Split(MM_columnsStr, "|") ' set the form values For i = LBound(MM_fields) To UBound(MM_fields) Step 2 MM_fields(i+1) = CStr(Request.Form(MM_fields(i))) Next ' append the query string to the redirect URL If (MM_editRedirectUrl <> "" And Request.QueryString <> "") Then If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0 And Request.QueryString <> "") Then MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString Else MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString End If End If End If %> <% ' *** Insert Record: construct a sql insert statement and execute it If (CStr(Request("MM_insert")) <> "") Then ' create the sql insert statement MM_tableValues = "" MM_dbValues = "" For i = LBound(MM_fields) To UBound(MM_fields) Step 2 FormVal = MM_fields(i+1) MM_typeArray = Split(MM_columns(i+1),",") Delim = MM_typeArray(0) If (Delim = "none") Then Delim = "" AltVal = MM_typeArray(1) If (AltVal = "none") Then AltVal = "" EmptyVal = MM_typeArray(2) If (EmptyVal = "none") Then EmptyVal = "" If (FormVal = "") Then FormVal = EmptyVal Else If (AltVal <> "") Then FormVal = AltVal ElseIf (Delim = "'") Then ' escape quotes FormVal = "'" & Replace(FormVal,"'","''") & "'" Else FormVal = Delim + FormVal + Delim End If End If If (i <> LBound(MM_fields)) Then MM_tableValues = MM_tableValues & "," MM_dbValues = MM_dbValues & "," End if MM_tableValues = MM_tableValues & MM_columns(i) MM_dbValues = MM_dbValues & FormVal Next MM_editQuery = "insert into " & MM_editTable & " (" & MM_tableValues & ") values (" & MM_dbValues & ")" If (Not MM_abortEdit) Then ' execute the insert Set MM_editCmd = Server.CreateObject("ADODB.Command") MM_editCmd.ActiveConnection = MM_editConnection MM_editCmd.CommandText = MM_editQuery MM_editCmd.Execute MM_editCmd.ActiveConnection.Close If (MM_editRedirectUrl <> "") Then Response.Redirect(MM_editRedirectUrl) End If End If End If %> BuildexOnline>>>



	من خلال هذه الخدمة المجانية نعمل على مساعدة كل باحث عن العمل في الحصول على العمل الذي يلائم مؤهلاته وتقوم هذه الخدمة على تسجيل الزائر لسيرته الذاتية في الموقع وستقوم ادارة بيلدكس أون لاين ( Buildexonline ) بتزويد الشركات بالسير الذاتية الملائمة لاحتياجاتها وسنعمل أيضاً على مساعدة الطلاب في ايجاد فرص عمل تدريبية خلال فصل الصيف ولن تقتصر هذه الخدمة على الطلاب أو المهندسين بل سنعمل أيضاً على تزويد المؤسسات الاستشارية والشركات الكبرى بالسير الذاتية للأكاديميين والخبراء... اضغط واختر القسم الذي يلائمك للاشتراك في برنامج بيلدكس أون لاين للتوظيف: - فرص عمل تدريبية لطلاب الهندسة - فرص عمل للمهندسين - فرص عمل للكفاءات والخبرات


		جميع الحقوق محفوظة للمجموعة العربية لتنظيم المعارض والمؤتمرات® هاتف: (963-11) 3737444 - فاكس : (963-11) 3737446 صندوق بريد: 2683 دمشق - سورية, البريد الالكتروني: arabiangroup@net.sy إدارة الموقع: info@buildexonline.com