Add New Record with ADO

Author ID:


Author Name:


Year Born:

The form responder looks like this:















Here Is the include file that displays appropriate errors:

ADO Schemas to list tables & fields

Here Is the contents of lib_fieldtypes.asp which Is included To make this example work:

Database Paging

          
   


  
  
  
  
  
  
  
  
  
  



  

5K Race

Records: - of









  

  

  

  

  

  


  

Name

Age

City

State

Time

Pace

      

  

How to filter a recordset

>Before Filter

>After Filter

Index Server Access via ADO

Choose The Word You Want To Search For::

Search Word:

The iskeywordrespond.asp looks like this:













It has To exclude many folders On my site And the following file excludes directories:

Insert TEXT blob using ADO

This example uses SQL Pass-thru To insert</p><p>a record into a database. This method allows us To insert into BLOB fields such As</p><p>SQL Server Text fields, FoxPro Memo fields, Or other fields > 255 characters.</p><p>This has an embedded Single quote(') To show how these can be handled With </p><p>an SQL insert.

Using a Stored Procedure with ADO

Dim cn As New ADODB.Connection
cn.Open sConStr
Dim cmd As New ADODB.Command
cn.CursorLocation = adUseClient
Set cmd.ActiveConnection = cn
cmd.CommandText = "addNew_Service"
cmd.CommandType = adCmdStoredProc
cmd.Parameters.Refresh
cmd.Parameters.Item("@wsdlfilename") = CStr(services(serviceId).wsdlfilename)
cmd.Parameters.Item("@WSMLFileName") = CStr(services(serviceId).WSMLFileName)
cmd.Parameters.Item("@name") = CStr(services(serviceId).name)
cmd.Parameters.Item("@description") = CStr(services(serviceId).description)
cmd.Parameters.Item("@uuid") = CStr(sUUID)
cmd.Parameters.Item("@Service_ID") = 0
cmd.Execute
Debug.Print Err.description
newService_ID = cmd.Parameters("@Service_ID").Value