最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
ASP做查询分析器(Query Analyzer)(II)
时间:2008-01-18 编辑:简简单单 来源:一聚教程网
sqlultimate.asp--Part B
' ++++++++++++++ FK Sub +++++++++++++++++
SUB FK(xdbname, xuserid, xpassword )
Dim strConn,conntemp,rsSchema,PKT,PKC,FKT,FKC
Const adSchemaForeignKeys = 27
strConn = "Provider=SQLOLEDB.1;Data Source="&strServer&";" & _
"Initial Catalog=" & xdbname & _
";UID=" & xuserid & ";PWD=" & xpassword & ";"
set conntemp = server.createobject("adodb.connection")
response.write("" & vbCrLf)
' ++++++++++++++ FK Sub +++++++++++++++++
SUB FK(xdbname, xuserid, xpassword )
Dim strConn,conntemp,rsSchema,PKT,PKC,FKT,FKC
Const adSchemaForeignKeys = 27
strConn = "Provider=SQLOLEDB.1;Data Source="&strServer&";" & _
"Initial Catalog=" & xdbname & _
";UID=" & xuserid & ";PWD=" & xpassword & ";"
set conntemp = server.createobject("adodb.connection")
response.write("
Primary Key | Foreign Key | ||
PK Table | PK Field | FK Table | FK Field |