⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 auto.php

📁 极限网络智能办公系统 - Office Automation 2.8 100% 源码
💻 PHP
字号:
<?php

include_once( "inc/auth.php" );
echo "\r\n<html>\r\n<head>\r\n<title>宏控件设定</title>\r\n<meta http-equiv=\"Content-Type\" content=\"text/html; charset=gb2312\">\r\n\r\n";
echo "<s";
echo "cript>\r\nfunction my_submit()\r\n{\r\n  if(ITEM_NAME.value==\"\")\r\n  {\r\n     alert(\"控件名称不能为空\");\r\n     return;\r\n  }\r\n  else if(ITEM_TYPE.value==\"\")\r\n  {\r\n     alert(\"宏控件类型不能为空\");\r\n     return;\r\n  }\r\n  else if((ITEM_TYPE.value==\"SYS_SQL\"||ITEM_TYPE.value==\"SYS_LIST_SQL\")&&ITEM_SQL.value==\"\")\r\n  {\r\n     alert(\"SQL查询语句不能为空\");\r\n     return;\r\n  }\r\n\r\n  var parent_window = parent.dialogA";
echo "rguments;\r\n\r\n  if(ITEM_TYPE.value.indexOf(\"SYS_LIST\")<0)\r\n     control_html=\"<input type=text \";\r\n  else\r\n     control_html=\"";
echo "<s";
echo "elect type=text \";\r\n\r\n  control_html+=\" title=\\\"\"+ITEM_NAME.value.replace(\"\\\"\",\"&quot;\")+\"\\\" class=\\\"AUTO\\\" value=\\\"{宏控件}\\\" datafld=\\\"\"+ITEM_TYPE.value+\"\\\" datasrc=\\\"\"+ITEM_SQL.value+\"\\\" style=\\\"font-size:\"+ITEM_SIZE.value+\";width:100px;\\\">\";\r\n\r\n  if(ITEM_TYPE.value.indexOf(\"SYS_LIST\")>=0)\r\n     control_html+=\"<option>{宏控件}</option></select>\";\r\n\r\n  if(edit_flag==1)\r\n  {\r\n    oSelection =  paren";
echo "t.dialogArguments.document.selection.createRange();\r\n    oSelection(0).title=ITEM_NAME.value;\r\n    parent_window.doStyle(\"delete\");\r\n    parent_window.insertHtml(control_html);\r\n  }\r\n  else\r\n    parent_window.EDIT_HTML.insertHtml(control_html);\r\n\r\n  window.close();\r\n}\r\n\r\n\r\n//-- 获取控件属性 --\r\nvar edit_flag=0;\r\nfunction LoadDo()\r\n{\r\n  oSelection = dialogArguments.document.selection.createRange();";
echo "\r\n  sRangeType = dialogArguments.document.selection.type;\r\n\r\n  if (sRangeType == \"Control\")\r\n  {\r\n  \tedit_flag=1;\r\n  \tITEM_NAME.value = oSelection(0).title;\r\n  \tITEM_SQL.value = oSelection(0).dataSrc;\r\n  \tfor(i=0;i<ITEM_TYPE.options.length;i++)\r\n  \t{\r\n  \t   if(ITEM_TYPE.options(i).value==oSelection(0).dataFld)\r\n  \t   {\r\n  \t      ITEM_TYPE.selectedIndex=i;\r\n  \t      break;\r\n  \t   }\r\n        }\r\n  \tIT";
echo "EM_SIZE.value = oSelection(0).style.fontSize.replace(\"px\",\"\");\r\n  }\r\n  ITEM_NAME.focus();\r\n}\r\n</script>\r\n</head>\r\n\r\n<body topmargin=\"0\" onload=\"LoadDo();\">\r\n\r\n<table border=\"0\" cellspacing=\"1\" width=\"100%\" class=\"small\" bgcolor=\"#000000\" cellpadding=\"3\" align=\"center\">\r\n  <tr class=\"TableContent\">\r\n      <td nowrap>控件名称:\r\n      </td>\r\n      <td nowrap>\r\n       <Input name=\"ITEM_NAME\" type=\"text\" class";
echo "=\"SmallInput\" size=\"20\">\r\n      </td>\r\n  </tr>\r\n  <tr class=\"TableContent\">\r\n      <td nowrap>宏控件类型:\r\n      </td>\r\n      <td nowrap>\r\n       ";
echo "<s";
echo "elect class=\"SmallSelect\" name=\"ITEM_TYPE\">\r\n        <option value=\"\">----单行输入框----</option>\r\n        <option value=\"SYS_DATE\">当前日期,形如 1999-01-01</option>\r\n        <option value=\"SYS_DATE_CN\">当前日期,形如 1999年1月1日</option>\r\n        <option value=\"SYS_TIME\">当前时间</option>\r\n        <option value=\"SYS_DATETIME\">当前日期+时间</option>\r\n        <option value=\"SYS_USERID\">当前用户ID</option>\r\n ";
echo "       <option value=\"SYS_USERNAME\">当前用户姓名</option>\r\n        <option value=\"SYS_DEPTNAME\">当前用户部门</option>\r\n        <option value=\"SYS_FORMNAME\">表单名称</option>\r\n        <option value=\"SYS_RUNNAME\">文号</option>\r\n        <option value=\"SYS_RUNDATE\">流程开始日期</option>\r\n        <option value=\"SYS_RUNDATETIME\">流程开始日期+时间</option>\r\n        <option value=\"SYS_SQL\">来自SQL查询语句</option>\r\n   ";
echo "     <option value=\"\">----下拉菜单----</option>\r\n        <option value=\"SYS_LIST_DEPT\">部门列表</option>\r\n        <option value=\"SYS_LIST_USER\">人员列表</option>\r\n        <option value=\"SYS_LIST_PRIV\">角色列表</option>\r\n        <option value=\"SYS_LIST_PRCSUSER1\">流程经办人列表</option>\r\n        <option value=\"SYS_LIST_PRCSUSER2\">本步骤经办人列表</option>\r\n        <option value=\"SYS_LIST_SQL\">来自SQL查询语句</op";
echo "tion>\r\n       </select>\r\n      </td>\r\n  </tr>\r\n  <tr class=\"TableContent\">\r\n      <td nowrap>SQL查询语句<br>('号用`号替换):\r\n      </td>\r\n      <td nowrap>\r\n       <textarea name=\"ITEM_SQL\" class=\"SmallInput\" cols=\"26\" rows=\"3\" title=\"如宏控件类型选择来自SQL查询语句,则填写\"></textarea>\r\n      </td>\r\n  </tr>\r\n  <tr class=\"TableContent\">\r\n      <td nowrap>字体大小:\r\n      </td>\r\n      <td nowrap>\r\n       <Input n";
echo "ame=\"ITEM_SIZE\" type=\"text\" class=\"SmallInput\" size=\"20\" title=\"可选,默认13像素\">\r\n      </td>\r\n  </tr>\r\n  <tr>\r\n      <td class=\"TableControl\" colspan=\"2\" align=\"center\">\r\n        <input type=\"submit\" onclick=\"my_submit();\" value=\"确 定\" class=\"SmallButton\">\r\n      </td>\r\n  </tr>\r\n</table>\r\n</body>\r\n</html>\r\n";
?>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -