| 1 |
<!-- #Include file="utils.asp" --> <!--include file with certain variable declarations-->
|
| 2 |
<html><head><title>Speedes Database - sp_classes_table Record</title></head>
|
| 3 |
<body bgcolor="#ffffff">
|
| 4 |
<%
|
| 5 |
Dim id,cname,SQLQuery,listurl
|
| 6 |
id = request.querystring("id") ` get the id of the record to display
|
| 7 |
` open a database connection and execute the query
|
| 8 |
Set OBJdbConnection=Server.CreateObject("ADODB.Connection")
|
| 9 |
OBJdbConnection.Open "speedes"
|
| 10 |
SQLQuery = "SELECT * from sp_classes_table where clsid = " & id
|
| 11 |
Set typelist = OBJdbConnection.Execute(SQLQuery)
|
| 12 |
if typelist.EOF then ` check if there are any records
|
| 13 |
%><!-- There are no sp_classes_table records -->
|
| 14 |
<%
|
| 15 |
else
|
| 16 |
cid = typelist("clsid")
|
| 17 |
%>
|
