<% page = Request("page") amazonquery = page %> <% If page = "Introduction" then %> Relationships, Marriage, Kids, Children, and Divorce. What you need to know. <% ElseIF page = "Definitions" then %> Legal Terms and Definitions for marriage & divorce. <% ElseIF page <> "" then %> <%=page%>: What you need to know <% ElseIF page = "" then %> Marriage Warnings, Parenting Guidance, and Divorce Advice.: Selecting the Right Divorce Attorney or Lawyer Part (2) <% End If %>

Marriage Warnings, Parenting Guidance, and Divorce Advice.

My nickname is Dr. Dreamer because first, I am a Doctor, and second, I have always dreamt of a wonderful life, where my spouse, and I would enjoy our children and have a great marriage. Even though my original dream is shattered, as a result of a divorce, I am still dreaming.....I would like to share with you a brief introduction of my story. I got married years ago, and my marriage was pretty good for the first 5 years. After that,


"The Yearning and the Reality"

Dr. Dreamer

the relationship between my ex and me started to deteriorate slightly and steadily. However, things were still reasonable between us, and we had our first child. After the birth of our child, my ex changed a lot, negatively so. This affected our relationship further, and life was getting more difficult.After the birth of our second child, things were getting a lot worse between us. This was the beginning of the end.
Topics:
  • All Posts
    • <% ' ------------------------------------------------------------------------------------------------- TOPICS dim myDir myDir = "/labels" sub ListFolderContents(path) dim fs, folder, file, item, url set fs = CreateObject("Scripting.FileSystemObject") set folder = fs.GetFolder(Server.MapPath(path)) for each item in folder.Files on error resume next myArr = Split (item.Name,".") myLimit = UBound(myArr) myOldName = "" i = 0 for each items in myArr if i" & myOldName & "
    " & vbCrLf) end if page = Replace(item.Name, " ", "%20") page = Replace(page, ".asp", "") if myArr(myLimit) = "asp" then Response.Write("
  • " & Replace(item.Name, ".asp", "") & "
    • ") End If next end sub ListFolderContents(myDir) %>
    Useful Links:
    Winning Child Custody


    Subscribe to
    Posts [Atom]

    Thursday, February 22, 2007

    Selecting the Right Divorce Attorney or Lawyer Part (2)

    Hi Everyone,

    Here is some more on how to select or choose the right attorney or lawyer for you. What you need to understand is that what matters is not necessarily to have the best attorney in town, rather, to have an attorney or a lawyer who is compatible with you.

    In other words, you should be looking for an attorney who gets along well with you, and who listens to you. My experience has been that there are various types of attorneys out there. Some of them, or I should say the majority, are overbearing in nature and like to dictate everything.

    My personal opinion is that you should stay away from that type, unless you really just want to be a follower throughout. Other lawyers, however, are more open and friendlier. These are the ones that I recommend!

    By getting along well with your attorney, you will feel that things are going fairly well for you. This is priceless from a psychological point of view! This is the equivalent of winning half the battle.

    Further, you will be spending your time efficiently with your attorney regarding the strategy that you will be using in some of the most important battles of your life, if not the most important one!

    A concomitant (byproduct) of spending time efficiently with your attorney is saving money, as you will not be wasting any time on arguing with him or her.

    Next time, I will be talking about signs to watch for when selecting an attorney...

    From Dr. Dreamer, good night everybody!

    Labels:

    posted by Dr. Dreamer @ 4:13 PM

    0 Comments:

    Post a Comment

    << Home

    		<% Dim SearchType Dim Query Dim XML Dim ResultLength Dim recordNumber Dim iCount Dim IPAddy Dim SearchEngine Dim Node DIM TITLE DIM URL DIM PRICE DIM IMAGEURL Dim ProductDescription If amazonquery = "" Then amazonquery = "Divorce" ElseIf amazonquery = "Intoduction" Then page = "Divorce" End If amazonquery = Replace(amazonquery, " ", "%20") SearchEngine = "http://webservices.amazon.com/onca/xml?Service=AWSECommerceService&SubscriptionId=1R15PYA4AG277WQYTTR2&Operation=ItemSearch&SearchIndex=Books&Keywords=" & amazonquery & "&ResponseGroup=Request,Small&AssociateTag=productinform-20" Set XML = Server.CreateObject("Microsoft.XMLHTTP") XML.Open "GET", SearchEngine, False XML.Send resultLength = CInt(XML.responseXML.selectNodes("ItemSearchResponse/Items/Item").length) If resultLength > 0 Then %> <% 'For iCount = 0 To CInt(resultLength)-1 For iCount = 0 To 6 on error resume next Set Node = XML.responseXML.selectSingleNode("ItemSearchResponse/Items/Item[" & CInt(iCount)& "]") 'ITEMID = Node.selectSingleNode("ASIN/ItemId").Text TITLE = Node.selectSingleNode("ItemAttributes/Title").Text URL = Node.selectSingleNode("DetailPageURL").Text PRICE = Node.selectSingleNode("ItemAttributes/ListPrice/FormattedPrice").Text IMAGEURL = Node.selectSingleNode("SmallImage/URL").Text DESC = Node.selectSingleNode("EditorialReviews/EditorialReview/Content").Text %> ") 'Response.Write(" " & page_name & " ") 'Response.Write(" " & PRICE & "
    ") 'Response.Write Left(DESC,100) 'Response.Write ("....Read More") %> <% Next Set Node = Nothing Set XML = Nothing %>
    Books:
    <% Response.Write("
    " & TITLE & "
    <% End If %>