|
<%
Const Request_POST = 1
Const Request_GET = 2
Dim strRetval
Dim xobj
Set xobj = CreateObject("SOFTWING.ASPtear")
Response.ContentType = "text/html"
On Error Resume Next
' URL, action, payload, username, password
strRetval = xobj.Retrieve("http://" & Request.ServerVariables("SERVER_NAME") & "/templates/toc-2003.aspx?Mode=SubMenu&Dir=" & Request.ServerVariables("SCRIPT_NAME") & "&now=" & NOW(), Request_GET, "", "", "")
If Err.Number <> 0 Then
Response.Write ""
If Err.Number >= 400 Then
Response.Write "Server returned error: " & Err.Number
Else
Response.Write "Component/WinInet error: " & Err.Description
End If
Response.Write ""
Response.End
End If
Response.Write strRetval
%>
|
| |
Sadie
Sadie was born on March 13th 1995 and passed due
to kidney failure on October 13th 2006, it was the hardest day our
family had to go through. We remember she died of old age and
there was nothing we could have done and just need to be fortunate
that we got to spend that many wonderful years with her and did not
loose her some tragic way. She was a wonderful dog, she loved
to camp, fish and be outdoors. We miss her dearly and know she
is in heaven waiting for us.
|
|
|
|
 |
|
