Advanced Search

Return to Snippet

Revision: 1533
at October 17, 2006 12:12 by jgmutza
Updated Code 
dim xml, rrs
set xml = new XmlAspConfig
if xml is Nothing then
  call errors.Error("Error", "Cannot create XmlAspConfig.")
else
  call xml.Bind(Server.MapPath("IODefinition_asp.xml"))
  if xml.Document is Nothing then
    call errors.Error("Error", xml.ErrorMessage)
  end if
end if
...
dim StationName, Port
...
dim xrs
set xrs = xml.GetResultSet("deviceio-station-port-select", Array(StationName, Port))

Revision: 1532
at October 17, 2006 11:55 by jgmutza
Initial Code 
dim xml, rrs
set xml = new XmlAspConfig
if xml is Nothing then
call errors.Error("Error", "Cannot create XmlAspConfig.")
else
call xml.Bind(Server.MapPath("IODefinition_asp.xml"))
if xml.Document is Nothing then
call errors.Error("Error", xml.ErrorMessage)
end if
end if
...
dim StationName, Port
...
dim xrs
set xrs = xml.GetResultSet("deviceio-station-port-select", Array(StationName, Port))
Initial URL 









Initial Description





A reusable implementation is a must-have.









Initial Title





Using Externalized SQL









Initial Tags














Initial Language





ASP