 |
|
| FGM SERIAL NUMBER: |
| |
3 |
| Title: |
| |
Micromechanics of Multiphase and Graded Materials |
| Organizer: |
| |
Prof. Marek-Jerzy Pindera |
| Description: |
| |
Analysis of the response of multiphase and functionally graded
materials to thermal and mechanical loading can be carried out at
different microstructural levels using appropriate homogenization-based
or direct techniques. The accuracy of such analyses depends on the
microstructural scale of the phases employed for grading purposes
relative to the structural scale of the analyzed component and the
thermal and/or mechanical gradients of the field variables. This
minisymposium aims at highlighting the different homogenization-based
and direct microstructural techniques employed in the analysis of
multiphase and graded materials, including the differences due to
explicit and implicit consideration of the microstructural details
and new multi-inclusion micromechanics models. |
| Key Words: |
| |
Micromechanics, homogenization, microstructural effects |
| |
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='" & "3" &"'"
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 "3-" &(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
%> |
|
|
