Grandes para el país, pequeñas para la empresa y las decisiones de la organización se basan en el cuestionario para obtener el fondo de la actitud hacia algo o un punto de vista. Si usa papel, no solo desperdiciará recursos, sino que también aumentará la dificultad de las estadísticas. Sin embargo, con el cuestionario electrónico, estos problemas se pueden resolver. El siguiente sistema de inicio le presentará cómo hacer un cuestionario de encuesta electrónica. Ejemplo de descripción: recientemente, el liderazgo entregó al director de la oficina, Lao Zhang, una tarea urgente para realizar una encuesta de cuestionario a todos los empleados dentro de la empresa. La compañía tiene miles de empleados. Este trabajo estadístico ha tardado varios días en completarse, lo que lleva mucho tiempo y es laborioso. Lao Zhang es culpable. Dije que el cuestionario se puede publicar en la intranet en forma de una página web. El empleado elige enviarlo por el lado del cliente. La computadora cuenta automáticamente los resultados. ¿No es esto eficiente y sin problemas? Lao Zhang estaba feliz. Producción del cuestionario de la página web Primero, abra Word para crear un documento en blanco, seleccione " Ver → Barra de herramientas ↠ Web Toolbox ", en la ventana emergente "Herramientas Web" seleccione el botón " submit " El botón "Enviar" aparecerá en el documento en la parte superior del formulario " " en la parte inferior del formulario " Coloque el cursor en la línea en blanco y escriba o pegue el contenido que desea investigar. A continuación, coloque el cursor en el primer contenido de la encuesta "[Seleccione:] ", seleccione" " Web Toolbox "en el" botón de opción "para insertar un botón de opción en el cursor, en Le sigue la A mayúscula, haga clic derecho en el botón de la unidad para establecer su propiedad HTMLNname (es decir, su nombre en la página web) en R1, la propiedad Value (es decir, su valor) se establece en A; inserte el segundo botón de opción, en Le sigue una B mayúscula, y su propiedad HTMLNname también es R1, la propiedad Value es B, y así sucesivamente. Al insertar los cuatro botones de opción del segundo contenido de la encuesta, debe establecer su atributo HTMLNname en R2, las otras configuraciones son las mismas que las del botón de la primera pregunta, y así sucesivamente, hasta que se agreguen los cuatro elementos del último contenido de la encuesta. Botón de selección (Figura 1) Si desea que los empleados completen otras sugerencias para la compañía al final de la encuesta, puede hacer clic en el control " área de texto " en " Web Toolbox " para insertar un " área de texto " control en la página. Establezca la propiedad HTMLNname de este control de " área de texto " en " yj ". Haga clic derecho en el botón "Enviar" y establezca su propiedad de Acción en "jg.asp", es decir, el usuario envía los valores de cada botón de opción al archivo jg.asp (Figura 2). Sugerencia: para agregar fácilmente un botón de opción, podemos seleccionar el menú "Herramientas ↠ Macro ↠ Editor de Visual Basic", seleccionar el menú "Insertar y Rarr; Módulo" en la ventana emergente de VBA, editar el código a la derecha. La ventana ingresa el código en el diagrama. Regrese a la ventana de documento de Word y seleccione el menú "Barras de herramientas y Rarr; Personalizar". En la ventana emergente "Personalizar", seleccione la pestaña "Pedidos" y seleccione esto en la sección "Guardar en". Para el nombre del documento, seleccione " macro " en la categoría ", seleccione el nombre del proceso en el código en " comando " (por ejemplo, " botón de opción de inserción "), arrástrelo a la barra de herramientas con el mouse Y haga clic con el botón derecho en Cambiar nombre y cierre " Personalizar ventana ". Después de eso, coloque el cursor en la posición en la que necesita insertar el botón de opción, haga clic directamente en este botón e ingrese el número de pregunta para confirmar. En este momento, se agregarán automáticamente cuatro botones de opción A, B, C y D. No es necesario volver a hacerlo. Configurar Si no desea ingresar el número de pregunta e insertar el botón de opción directamente, puede eliminar la segunda línea del código y reemplazarlo con la tercera línea. Tenga cuidado de eliminar la "" '" delante de esta línea (Figura 3). Consejo: para hacer que el código funcione, también debe seleccionar el menú "Herramientas ↠ Macro ↠ Seguridad" y configurar la seguridad de la macro en "Bajo" en la ventana emergente. Finalmente guarde el documento como un archivo de página web index.htm. Este artículo guarda index.htm en la carpeta D: \\ 123. Escribir un archivo recibido Antes de escribir un archivo recibido, debe crear un archivo Excel llamado "" Survey Results.xls" en la carpeta D: \\ 123. Cree dos hojas de trabajo en el archivo, una llamada "" ", otro nombre es " recomendado ". Entre ellos, el número total de personas en cada pregunta en la lista de trabajo denominada "Resultados", el número de A, el número de B, el número de C y el número de D deben ingresarse primero, la proporción de opciones de cada pregunta es El número de opciones se divide por el número total de personas en la pregunta, formateada como un estilo de porcentaje; la hoja de trabajo con el nombre "Recomendado" se usa para almacenar sugerencias de los empleados para la compañía.
(Figura 4) A continuación, simplemente escriba el código de recepción. Primero podemos crear un archivo de texto en la carpeta de la unidad D llamada "" 123", luego ingresar el código en el archivo de este archivo y finalmente cambiar el nombre del archivo de texto a jg.asp, preste atención a la extensión. Para cambiar (Figura 5). Publicación de páginas web y páginas de acceso para empleados Primero, instale la herramienta de administración de IIS en el servidor en la sala de computadoras. Puede descargar un archivo de instalación de IIS en Internet basado en la versión del sistema del servidor y extraerlo en un disco. Luego, seleccione " Inicio ↠ Panel de control ↠ Agregar o quitar programas, seleccione " Agregar /quitar componentes de Windows > en la ventana emergente "Asistente de componentes de Windows", marque "Servicios de información de Internet" ( IIS) y " para instalar. Si se le solicita que seleccione el archivo de instalación, seleccione la carpeta donde se encuentra el paquete de instalación de IIS. Una vez completada la instalación, haga clic en "Inicio" y seleccione "Configuración &Rarr"; Panel de control ↠ Herramientas de administración ↠ "Internet Information Services", en la ventana emergente a la izquierda de la expansión "computadora local", "sitio web predeterminado" Haga clic con el botón derecho en el "Sitio web predeterminado" y seleccione el menú "Propiedades". En la ventana emergente "Propiedades del sitio predeterminado", seleccione la pestaña "Menú principal" y haga clic en el botón "Examinar" para seleccionar el índice. La carpeta donde se encuentra .htm " D: \\ 123 ", marque la siguiente opción " lea " " write ". A continuación, también debe seleccionar la pestaña "Documentos" y marcar "" Habilitar documento predeterminado". Si no hay index.htm en el cuadro de lista, debe hacer clic en el botón "Agregar" para ingresar index.htm. Finalmente, haga clic en el botón " OK " para cerrar la ventana de diálogo " Internet Information Services ". Una vez que se publica la página web de la encuesta, los empleados abren el navegador IE en sus computadoras respectivas, ingresan la dirección IP de la sala de servidores en la barra de direcciones y pueden navegar y responder las preguntas en la página web. Una vez que el empleado completa la página de envío de la encuesta, los datos de los resultados de la encuesta también se recopilan en el archivo de Excel creado (Figura 6). Apéndice: Código <% set strConn = server.createobject (" adodb.connection ") strConn.open = " Provider = Microsoft.Jet.OLEDB.4.0; Data Source = " &Server.MapPath (" Investigación Resultado .xls ") &"; Extended Properties = " Excel 8.0; HDR = Yes; "; para i = 1 a 15tmp = request (< R " &i) si tmp < > " " thenda = tmpelseda = da + ". " end ifset rs = server.CreateObject (" adodb.recordset ") sql = " Seleccione * De [Result $] Donde Título = " &ir.Open sql, strConn, 1,3if da = A " A " thenrs (" Un número de personas ") = rs (" A number of people ") + 1rs (" número total ") = Rs ("número total") + 1end ifif da = "B" thenrs ("respuesta B número") = rs ("respuesta B número") + 1rs ("número total") = Rs ("total number") + 1end ifif da = "C" thenrs ("answer C number") = rs ("answer C number") + 1rs ("number total") = Rs (" número total ") + 1end ifif da = " D " thenrs (" ") = rs (" Un número de personas ") + 1rs (" número total ") = rs (" número total ") +1end ifrs.Updateset rs = nothingnextif trim (solicitud (" yj " )) < > " " thenset rs = server.CreateObject (" adodb.recordset ") sql = " Select * From [recommended $] " rs.Open sql, strConn, 1,3rs.addnewrs ( " número de serie ") = rs.recordcount + 1rs (" sugerencias ") = request (" yj ") rs.Updateset rs = nothingend ifstrConn.closeset strConn = nothingresponse.write (" //")% > Este artículo es de [Inicio del sistema] www.xp85.com