Die Codekopie lautet wie folgt:
<%@Sprache = "vbscript" Codepage = "936"%>
<%
iftrim (request.form ("tableName"))
'---- Einstellungen zum Öffnen der Datenbankverbindung
dbs = "dataSource ="+server.mappath ("Datenbank.mdb")+"; Provider = microsoft.jet.oledb.4.0;"
setConn = server.createObject ("adodb.Connection")
Conn.opendbs
'Definieren Sie Adox, geben Sie die Verbindung an
setAdox = server.createObject ("adox.catalog")
SetAdox.activeConnection = conn
'Tabelle erstellen, Attribute schreiben
SetObjtable = server.createObject ("adox.table")
'objtable.name = "Tabelle3"
objtable.name = trim (request.form ("tableName") ')' Form Get
'objtable.Parentcatalog = adox
'Definieren Sie das erste Feld
setObjcolumn = server.createObject ("adox.column")
'SetObjcolumn.Parentcatalog = adox
objcolumn.name = "column1"
objcolumn.typ = 202'Data Typ 202 Repräsentiert Text,
Objcolumn.Attributes = 2'1-Erforderliche Felder, 2-nicht ergriffen
objtable.columns.Appendobjcolumn
setObjcolumn = nichts ist die ersten Feldinformationen
'Definieren Sie das zweite Feld
setObjcolumn = server.createObject ("adox.column")
'SetObjcolumn.Parentcatalog = adox
objcolumn.name = "column2"
objcolumn.typ = 3
objcolumn.attributes = 2
objtable.columns.Appendobjcolumn
setObjcolumn = nichts
Adox.tables.appendobjtable
SetAdox = nichts
%>
<! DocTypEHtmlPublic "-// W3C // dtdxhtml1.0Transitional // en" "http://www.w3.org/tr/xhtml1/dtd/xhtml1-transitional.dtd">
<htmlxmlns = "http://www.w3.org/1999/xhtml">
<kopf>
<metahttp-äquiv = "content-type" content = "text/html; charSet = gb2312"/>
<titels> Tabellen und Felder erstellen </title>
<Syletyps = "text/css">
<!-
Körper, td, th {
Schriftgröße: 12px;
}
->
</style> </head>
<body>
<p> 'Verwenden der Eigenschaften und Sammlungen des Säulenobjekts <strong> </strong> können Sie: <br/>
'Identifizieren Sie die Spalte anhand der NAME -Eigenschaft. <br/>
'Verwenden Sie die Typ -Eigenschaft, um den Datentyp der Spalte anzugeben. <br/>
„Verwenden Sie das Attributattribut, um festzustellen, ob die Spalte eine feste Länge ist oder ob sie einen Nullwert enthalten kann. <br/>
„Verwenden Sie die Eigenschaft definedSize, um die maximale Größe der Spalte anzugeben. <br/>
„Verwenden Sie für numerische Datenwerte die NumericsCale -Eigenschaft, um den Bereich anzugeben. <br/>
'Für numerische Datenwerte verwenden Sie die Präzisionseigenschaft, um die maximale Genauigkeit anzugeben. <br/>
Verwenden Sie das ParentCatalog -Attribut, um den übergeordneten Katalog der Spalte anzugeben. <br/>