Basic HTML version of Foils prepared July 5 98

Foil 17 ASP - Example Code II (contd.)

From FMS: Forces Modeling and Simulation Handout JSU HPC Summer Institute for Undergraduates, Jackson MS -- June 15 1998. by Wojtek Furmanski, Subhash Nair, Tom Pulikal


<% `print the member variables depending on the attribute
Sub printData(ByVal attrib)
DataQuery = "select dname from sp_data_table where "
DataQuery = DataQuery &" dattrib ='" & attrib &"' AND dclsid = " & cid
DataQuery = DataQuery & " order by dname"
`form the query and execute it
Set datalist = OBJdbConnection.Execute(DataQuery)
attrib = attrib & " Data"
if(Not datalist.Eof) then ` if the result set is not empty then print it
printRecord attrib,datalist
end if
End Sub
%>



© Northeast Parallel Architectures Center, Syracuse University, npac@npac.syr.edu

If you have any comments about this server, send e-mail to webmaster@npac.syr.edu.

Page produced by wwwfoil on Sat Nov 28 1998