Recomendado: Código de programa del reproductor de video web Código general Al hacer un programa para el cliente, de repente encontré un problema, es decir, cuando el usuario de la página del producto envió un archivo de reproducción de video, cómo reproducir el formato de video correcto en la URL enviada ... Estuve deprimido por un tiempo y pensé en la idea, y luego comencé a hacerlo ... la idea es obtener el tipo de archivo primero, primero, primero,
Primero, use el acceso para crear una nueva base de datos , establezca el nombre en Luntan, el nombre de la tabla de datos a la información, cree los siguientes campos: texto, nombre, tiempo y establezca el valor predeterminado de tiempo para ahora
| El siguiente es el contenido citado: <% Establecer com = server.createObject (ADODB.Connection) com.opEdriver = {Microsoft Access Driver (Luntan.mdb); pwd = información; dbq = & server.mappath (Luntan.mdb) sql = seleccionar*de la orden de información por tiempo Desc Establecer rs = server.createObject (ADODB.Recordest) Rs.open SQL, COM, 3,2 Si Rs.Eof o Rs.Bof entonces Respuesta. No escriba ningún comentario demás Rs.MoveFirst mientras que no rs.eof. Response.Write RS (Nombre) y publicado en & rs (Time) y <br> Response.Write RS (texto) y <br> <hr> Rs.Movenext encaminarse a AbsolutePosition = n, (n = 1,2,3 ......) final si %> La siguiente es la sección de escritura de mensajes del usuario. Supongamos que la página del foro es información.asp, entonces <Form Method = Post Action = Information.asp> Nombre: <input type = text size = 12 name = name> <br> Deja un mensaje: <Textarea cols = 30 fila = 4 name = text> </extarea> <br> <Entrada tipo = enviar value = enviar> </form> |
La última parte es registrar los datos del formulario enviados por el usuario en la base de datos,
El siguiente es el contenido citado: <% Si solicita (texto) <> vacío y solicitud (nombre) <> vacío entonces entonces Establecer COtor = Server.CreateObject (ADODB.Connection) COB.OPEDRIVER = {Microsoft Access Driver (*. Mdb)}; pwd = información; Dbq = & server.mappath (Luntan.mdb) sql = seleccionar*de la información Establecer rsb = server.createObject (ADODB.RecordSet) rsb.open sql, peine, 3,2 rsb.addnew RSB (texto) = request (texto) RSB (nombre) = solicitud (nombre) rsb.update final si %> |
Compartir: Dos diseños interesantes de contadores de visitantes Como parte indispensable del sitio web, el mostrador de los visitantes no solo puede registrar la cantidad de veces que se visita el sitio web, sino también mejorar la diversión y la visibilidad de la página web a través del diseño vívido e interesante, lo que hace que el contrarrestar visitante sea un paisaje en la página web. Los siguientes son dos divertidas de diseño fácil