MINI-SYMPOSIA DETAILS

FGM SERIAL NUMBER:
  5
Title:
  Topology Optimization
Organizers:
  Prof. Eric de Sturler (Primary Organizer)
Prof. Glaucio Paulino (Co-Organizer)
Description:
  This minisymposium aims to bring together researchers working on various aspects of topology optimization applied to advanced materials systems, e.g, piezo-electric materials and FGMs. In particular, we are interested in contributions involving novel material models, material design, efficient solution schemes for large-scale problems, flexible mechanisms, and MEMS.
Key Words:
  Topology optimization, numerical methods, solvers, modeling, multiphysics, multiscale
 
Abstracts submitted to this MS:
<% 'Dimension variables Dim adoCon 'Holds the Database Connection Object Dim rsGuestbook 'Holds the recordset for the records in the database Dim strSQL 'Holds the SQL query for the database Dim strUser 'Create an ADO connection object Set adoCon = Server.CreateObject("ADODB.Connection") 'Set an active connection to the Connection object using a DSN-less connection adoCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("Abstracts.mdb") 'Set an active connection to the Connection object using DSN connection 'adoCon.Open "DSN=guestbook" 'Create an ADO recordset object Set rsGuestbook = Server.CreateObject("ADODB.Recordset") 'Initialise the strSQL variable with an SQL statement to query the database strSQL = "SELECT abstracts.* FROM abstracts Where SerialNumber='" & "5" &"'" strSQL = strSQL & "ORDER BY AbsID" 'Open the recordset with the SQL query rsGuestbook.Open strSQL, adoCon 'Loop through the recordset Do While not rsGuestbook.EOF %>
<% 'Write the HTML to display the current record in the recordset Response.Write "5-" &(rsGuestbook("AbsID")) If rsGuestbook("SubID") = ("0") then Response.Write ("") else Response.Write "-" & rsGuestbook("SubID") & " " end if %> Title: <% Response.Write (rsGuestbook("ProposedPaperTitle")) %>
  Author(s): <% If rsGuestbook("LasName2") = ("1") then Response.Write rsGuestbook("Title1") & " " & rsGuestbook("FirName1") & " " & rsGuestbook("LasName1") & " " elseif rsGuestbook("LasName3") = ("1") then Response.Write rsGuestbook("Title1") & " " & rsGuestbook("FirName1") & " " & rsGuestbook("LasName1") & ", " & rsGuestbook("Title2") & " " & rsGuestbook("FirName2") & " " & rsGuestbook("LasName2") & " " elseif rsGuestbook("LasName4") = ("1") then Response.Write rsGuestbook("Title1") & " " & rsGuestbook("FirName1") & " " & rsGuestbook("LasName1") & ", " & rsGuestbook("Title2") & " " & rsGuestbook("FirName2") & " " & rsGuestbook("LasName2") & ", " & rsGuestbook("Title3") & " " & rsGuestbook("FirName3") & " " & rsGuestbook("LasName3") & " " elseif rsGuestbook("LasName5") = ("1") then Response.Write rsGuestbook("Title1") & " " & rsGuestbook("FirName1") & " " & rsGuestbook("LasName1") & ", " & rsGuestbook("Title2") & " " & rsGuestbook("FirName2") & " " & rsGuestbook("LasName2") & ", " & rsGuestbook("Title3") & " " & rsGuestbook("FirName3") & " " & rsGuestbook("LasName3") & ", " & rsGuestbook("Title4") & " " & rsGuestbook("FirName4") & " " & rsGuestbook("LasName4") & " " elseif rsGuestbook("LasName6") = ("1") then Response.Write rsGuestbook("Title1") & " " & rsGuestbook("FirName1") & " " & rsGuestbook("LasName1") & ", " & rsGuestbook("Title2") & " " & rsGuestbook("FirName2") & " " & rsGuestbook("LasName2") & ", " & rsGuestbook("Title3") & " " & rsGuestbook("FirName3") & " " & rsGuestbook("LasName3") & ", " & rsGuestbook("Title4") & " " & rsGuestbook("FirName4") & " " & rsGuestbook("LasName4") & ", " & rsGuestbook("Title5") & " " & rsGuestbook("FirName5") & " " & rsGuestbook("LasName5") & " " elseif rsGuestbook("LasName7") = ("1") then Response.Write rsGuestbook("Title1") & " " & rsGuestbook("FirName1") & " " & rsGuestbook("LasName1") & ", " & rsGuestbook("Title2") & " " & rsGuestbook("FirName2") & " " & rsGuestbook("LasName2") & ", " & rsGuestbook("Title3") & " " & rsGuestbook("FirName3") & " " & rsGuestbook("LasName3") & ", " & rsGuestbook("Title4") & " " & rsGuestbook("FirName4") & " " & rsGuestbook("LasName4") & ", " & rsGuestbook("Title5") & " " & rsGuestbook("FirName5") & " " & rsGuestbook("LasName5") & ", " & rsGuestbook("Title6") & " " & rsGuestbook("FirName6") & " " & rsGuestbook("LasName6") & " " elseif rsGuestbook("LasName8") = ("1") then Response.Write rsGuestbook("Title1") & " " & rsGuestbook("FirName1") & " " & rsGuestbook("LasName1") & ", " & rsGuestbook("Title2") & " " & rsGuestbook("FirName2") & " " & rsGuestbook("LasName2") & ", " & rsGuestbook("Title3") & " " & rsGuestbook("FirName3") & " " & rsGuestbook("LasName3") & ", " & rsGuestbook("Title4") & " " & rsGuestbook("FirName4") & " " & rsGuestbook("LasName4") & ", " & rsGuestbook("Title5") & " " & rsGuestbook("FirName5") & " " & rsGuestbook("LasName5") & ", " & rsGuestbook("Title6") & " " & rsGuestbook("FirName6") & " " & rsGuestbook("LasName6") & ", " & rsGuestbook("Title7") & " " & rsGuestbook("FirName7") & " " & rsGuestbook("LasName7") & " " elseif rsGuestbook("LasName9") = ("1") then Response.Write rsGuestbook("Title1") & " " & rsGuestbook("FirName1") & " " & rsGuestbook("LasName1") & ", " & rsGuestbook("Title2") & " " & rsGuestbook("FirName2") & " " & rsGuestbook("LasName2") & ", " & rsGuestbook("Title3") & " " & rsGuestbook("FirName3") & " " & rsGuestbook("LasName3") & ", " & rsGuestbook("Title4") & " " & rsGuestbook("FirName4") & " " & rsGuestbook("LasName4") & ", " & rsGuestbook("Title5") & " " & rsGuestbook("FirName5") & " " & rsGuestbook("LasName5") & ", " & rsGuestbook("Title6") & " " & rsGuestbook("FirName6") & " " & rsGuestbook("LasName6") & ", " & rsGuestbook("Title7") & " " & rsGuestbook("FirName7") & " " & rsGuestbook("LasName7") & ", " & rsGuestbook("Title8") & " " & rsGuestbook("FirName8") & " " & rsGuestbook("LasName8") & " " else Response.Write " " end if %>
  Abstract: <% Response.Write (rsGuestbook("Abstract")) %>

<% 'Move to the next record in the recordset rsGuestbook.MoveNext Loop %>