<%@LANGUAGE="VBSCRIPT"%> <% ' FileName="Connection_odbc_conn_dsn.htm" ' Type="ADO" ' DesigntimeType="ADO" ' HTTP="true" ' Catalog="" ' Schema="" Dim MM_Tuff_STRING MM_Tuff_STRING = "dsn=TTJP;uid=jcholt;pwd=iwatds98;" %> <% Dim rsTerm__MMColParam rsTerm__MMColParam = "1" If (Request("MM_EmptyValue") <> "") Then rsTerm__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rsTerm Dim rsTerm_cmd Dim rsTerm_numRows Set rsTerm_cmd = Server.CreateObject ("ADODB.Command") rsTerm_cmd.ActiveConnection = MM_Tuff_STRING rsTerm_cmd.CommandText = "SELECT * FROM dbo.TermCond WHERE ID = ?" rsTerm_cmd.Prepared = true rsTerm_cmd.Parameters.Append rsTerm_cmd.CreateParameter("param1", 5, 1, -1, rsTerm__MMColParam) ' adDouble Set rsTerm = rsTerm_cmd.Execute rsTerm_numRows = 0 %> Tuff Torq Corporation
Name:
Email:
Terms & Conditions

<%=(rsTerm.Fields.Item("Copy").Value)%>

home > Return > Terms & conditions
<% rsTerm.Close() Set rsTerm = Nothing %>