 |
|
| FGM SERIAL NUMBER: |
| |
6-2 |
| Title: |
| |
Functionally Tailored Structures for Extreme Thermo-Acoustic Environments |
| 2) Analytical and Modeling Aspects of Functionally Tailored Structures
for Extreme Thermo-acoustic Environments |
| Organizer: |
| |
Dr. Larry Byrd |
| Description: |
| |
This session will focus on methods of modeling functionally tailored
structures for the combined extreme environment. This would include
but is not limited to the dynamic response at high temperature using
analytical, finite element, boundary element, modal or reduced order
modal methods. Other topics include modeling the effect of residual
stresses, crack initiation, failure mechanisms and fatigue, optimal
structures as well as high speed impact. |
| Key Words: |
| |
Numerical modeling, multi-scale, thermo-acoustic, crack initiation,
failure mechanisms, fatigue, optimization |
| |
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='" & "6" &"'"
strSQL = strSQL & "ORDER BY SubID"
'Open the recordset with the SQL query
rsGuestbook.Open strSQL, adoCon
'Loop through the recordset
Do While not rsGuestbook.EOF
%> <% If rsGuestbook("AbsID") = "2" then
%>
| <%
'Write the HTML to display the current record in the recordset
Response.Write "6-" &(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"))
%> |
|
<%
else Response.Write " "
end if %> <%
'Move to the next record in the recordset
rsGuestbook.MoveNext
Loop
%> |
|
|
