📄 ute.asp
字号:
<%@ language = "VBScript" %>
<%
'---------------------------------------------------------------------------
'
' Project: UTE - (U)niversal ASP (T)able (E)ditor
'
' Module: UTE Active Server Page
'
' Version: 3.01
'
' Comments: This module does the following things:
' 1. Creates the HTML frame for UTE class
' 2. Inserts the UTE class
'
'---------------------------------------------------------------------------
'
' (c) in 2000-2003 by Tom Wellige
' http://www.wellige.com mailto:tom@wellige.com
'
' This project is released under the "GNU General Public License (GPL)"
' http://www.gnu.org/licenses/gpl.html
'
' and is maintained on SourceForge at
' http://sourceforge.net/projects/ute-asp/
'
' and can also be found on CodeProject at
' http://www.codeproject.com/asp/ute.asp
'
'---------------------------------------------------------------------------
option explicit
%>
<!--#include file ="ute_definition.inc"-->
<%
Dim sDSN
' To use a DSN-Less Connection use the following sDSN definition.
' !!! By using this, UTE is able to detect Primary Keys accurately.
sDSN = "Provider=Microsoft.Jet.OLEDB.4.0;" &_
"Data Source=" & Server.MapPath("test.mdb")
' To use a DSN (ODBC) Connection use the following sDSN defintion.
' You need to setup an ODBC data source.
' !!! By using this, UTE is *NOT* always able to detect Primary Keys accurately.
' sDSN = "test"
Dim ute
Set ute = new clsUTE
ute.DBName = "TEST.MDB" ' Name of Database. For display purpose only
'ute.ReadOnly = True ' readonly mode
'ute.ListTables = False ' display toolbutton to list all tables within db
'ute.Filters = False ' display toolbutton to define and activate filters
'ute.Export = False ' display toolbutton to export all data to CSV file
'ute.SQL = False ' display toolbutton to show current sql statement
'ute.Definitions = False ' display toolbutton to show field defintions
ute.Init sDSN ' init must be called *before* any HTML code is
' is written, otherwise the export feature doesn't work !
%>
<!doctype html public "-//W3C//DTD HTML 3.2//EN">
<html>
<head>
<title><%=ute.HeadLine%> - Universal Table Editor</title>
<link rel="stylesheet" type="text/css" href="ute_style.css">
</head>
<body bgcolor="#FFFFFF" link="#0000A0" vlink="#0000A0" alink="#0000A0">
<%
ute.Draw
Set ute = Nothing
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -