|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
Windows本身的所有问题都会一成不变的也累加到了它的身上。安全性、稳定性、跨平台性都会因为与NT的捆绑而显现出来;数据|数据库|数据库布局tonny
转载请显现出处:http://www.weiw.com
数据库布局操纵。顺应于access,sqlserver等罕见的数据库。
1。创建毗连。
能够经由过程ODBC或OLEDB毗连。
SetgObjDC=Server.CreateObject("ADODB.Connection")
dimstrconn,myDSN
myDSN="test"
strconn="DSN="&myDSN&";uid=sa;pwd="
strconn="Provider=SQLOLEDB.1;PersistSecurityInfo=True;UserID=sa;InitialCatalog=MeiSha;DataSource=tonny"
gObjDC.ConnectionString=strconn
gObjDC.Open
2。显现一切表
setgObjRS=gObjDC.OpenSchema(adSchemaTables)
DoWhileNotgObjRS.EOF
IfgObjRS.Fields("TABLE_TYPE")="TABLE"ANDLeft(gObjRS.Fields("TABLE_NAME"),4)"MSys"Then
不用把体系表显现出来
Response.Write"<TR>"
Response.Write"<TD>"&gObjRS.Fields("TABLE_NAME")&"</TD>"
myPLink="?DSN_NAME="&myDSN&"&Table_Name="&gObjRS.Fields("TABLE_NAME")
Response.Write"<TD><AHREF=tablestruct.asp"&myPLink&">Structure</A></TD>"
Response.Write"<TD><AHREF=tablecontent.asp"&myPLink&">Content</A></TD>"
Response.Write"</TR>"&vbCrLf
EndIf
gObjRS.MoveNext
Loop
gObjRS.Close
3。新建表
<FORMMETHOD=POSTACTION="definetable.asp?DSN_Name=<%=myDSN%>">
TableName:<BR>
<INPUTTYPE="text"NAME="Table_Name"><BR>
FieldCount:<BR>
<INPUTTYPE="text"NAME="Field_Count"><BR>
<BR>
<INPUTTYPE="submit"VALUE="Create">
</FORM>
definetable.asp中次要源码
myFieldCount=Request.Form("Field_Count")
<FORMMETHOD=POSTACTION="createtable.asp?DSN_Name=<%=Request.Form("DSN_Name")%>&Table_Name=<%=Request.Form("Table_Name")%>&Field_Count=<%=myFieldCount%>"ID="Form1">
<TABLEID="Table2">
<TR>
<TD>Name</TD>
<TD>Type</TD>
<TD>Length</TD>
<TD>Null</TD>
<TD>PrimaryKey</TD>
<TD>UniqueIndex</TD>
</TR>
<%Fori=1tomyFieldCount%>
<TR>
<TD><INPUTTYPE="text"NAME=<%="FieldName_"&i%>></TD>
<TD><SELECTSIZE=1NAME=<%="FieldType_"&i%>>
<!-请注重:此处依据分歧数据库填写字段范例->
<OPTION>BINARY
<OPTION>BIT
<OPTION>BYTE
<OPTION>COUNTER
<OPTION>CURRENCY
<OPTION>DATETIME
<OPTION>SINGLE
<OPTION>DOUBLE
<OPTION>SHORT
<OPTION>LONG
<OPTION>LONGTEXT
<OPTION>LONGBINARY
<OPTION>TEXT
</SELECT>
</TD>
<TD><INPUTTYPE="text"SIZE=5NAME=<%="FieldLength_"&i%>ID="Text2"></TD>
<TD>
<SELECTSIZE=1NAME=<%="FieldNull_"&i%>ID="Select2">
<OPTION>notnull
<OPTION>null
</SELECT>
</TD>
<TD><INPUTTYPE="checkbox"NAME=<%="FieldPrimary_"&i%>ID="Checkbox1"></TD>
<TD><INPUTTYPE="checkbox"NAME=<%="FieldUnique_"&i%>ID="Checkbox2"></TD>
</TR>
<%Next%>
</TABLE>
<INPUTTYPE="reset"VALUE="Clear"ID="Reset1"NAME="Reset1"><INPUTTYPE="submit"VALUE="Create"ID="Submit1"NAME="Submit1">
</FORM>
createtable.asp中次要源码
myPrimary=""
mySQLQueryString="CREATETABLE"&myTable&"("
myFieldCount=CInt(Request.QueryString("Field_Count"))
Fori=1tomyFieldCount
myFieldName=Request.Form("FieldName_"&i)
mySQLQueryString=mySQLQueryString&Chr(34)&_
myFieldName&Chr(34)&""&_
Request.Form("FieldType_"&i)
myLength=Request.Form("FieldLength_"&i)
IfisNumeric(myLength)Then
mySQLQueryString=mySQLQueryString&"("&myLength&")"
E</p>asp可以轻松地实现对页面内容的动态控制,根据不同的浏览者,显示不同的页面内容。而浏览者一点觉察不出来,就像为他专门制作的页面一样。使用各种各样的组件,asp可以完成无比强大的功能。 |
|