Herramienta de administración de bases de datos en línea DB007 Descargar: //www.vevb.com/codes/6195.html
La copia del código es la siguiente:
<!-
'**************************************
'*usar:
'^Procesamiento de acceso y bases de datos SQL en línea en la interfaz Ver
'*Autor: Guan Shijie
'*Fecha de creación: 2006-5-28
'*2006-06-04 Función de modificación de datos agregada
'*2006-06-10 agregó la función de insertar datos en tablas vacías
'*2006-09-8 agregó la función de modificar el nombre del campo y el nombre de la tabla para corregir algunos errores
'*Ejecutar SQL, si se selecciona, devolverá el resultado, de lo contrario devolverá el resultado
'*Este programa se puede usar de forma gratuita. Mantenga esta información al reimprimir
'**************************************
->
<html>
<Evista>
<metahttp-equiv = "content-type" content = "text/html; charset = gb2312">
<title> Herramienta de gestión de bases de datos en línea DB0071.5 </title>
<styletype = "text/css">
<!-
cuerpo, td, th {Font-Family: "安体"; font-size: 12px;}
Forma {margen: 0px; padding: 0px;}
cuerpo {margen: 5px; scrollbar-arrow-color:#6666666; scrollbar-face-color: #ddddd; scrollbar-darkshadow-color:#999999; Scrollb; AR-Highlight-Color: #FFFFF; Scrollbar-3Dlight-Color: #CCCCCC; Scrollbar-shadow-Color: #fffff; Scrollbar-Track-Color: #EEEE;}
Entrada {border-width: 1px; estilo borde: sólido; border-color:#cccccc#9999999#999999#ccccccc; altura: 16px;}
TD {fondo: #fff;}
TextArea {Border-width: 1px; Border-Style: Solid; Border-Color:#CCCCCC#999999#999999#CCCCCC;}
A: enlace {TEXT-Decoration: None;}
A: Visited {Text-Decoration: None;}
A: Hover {Text-Decoration: Underline;}
A: Active {Text-Decoration: None;}
.fixspan {ancho: 150px; space blanco: nowrap; word-break: keep-thol; desbordamiento: oculto; texto-superflujo: elipsis;}
->
</style>
</ablo>
<Body>
<%
ifrequest ("key") = "db" entonces
sesión ("dbtype") = request ("dbtype")
Session ("DBSTR") = request ("dBStr")
Respuesta. Redirect "?"
endif
ifRequest ("key") = "creativeAtabase" entonces
callCreateDatabase ()
endif
ifsession ("dbtype") = "" orsession ("dbstr") = "" entonces
%>
<formaction = "? key = db" método = "post" name = "dbt">
<br>
Tipo de conexión:
<inputName = "dbtype" type = "radio" value = "access" onClick = "dbst.value = 'provider = Microsoft.Jet.Onedb.4.0; PersistSecurityInfo = false; contraseña =; DataSource = <%= Server.Mappath ("/") &"/"%>" verificado> ">" "