<% Function showtwitter() On Error Resume next howmannyposts = 7 url = "http://twitter.com/statuses/user_timeline/15436552.rss" set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP") xmlhttp.open "GET", url, False xmlhttp.send "" myvar = xmlhttp.responseText myvar2 = split(myvar, "") myvar3 = split(myvar2(1), "", -1, 1) myjoin = Join(myvar3, VbCrLf) myvar3 = Split(myjoin, "tazicus:") myubound = ubound(myvar3) myuboundreal = myubound If myubound > howmannyposts Then myubound = howmannyposts counter = 1 loopcounter = 1 Do Until loopcounter = myubound myloopvar = Split(myvar3(counter), "<description>") mydatevar = Split(myvar3(counter), "<pubDate>") mydatevar1 = Split(mydatevar(1), "</pubDate>") mydate = mydatevar1(0) myloopvar1 = Split(myloopvar(1), "</description>") mymessage = Split(myloopvar1(0), "tazicus:") mymessagetemp = mymessage(1) mysplitdate = Split(mydate, " ") workingtime = mysplitdate(4) myyear=mysplitdate(3) mymonth=mysplitdate(2) myday=mysplitdate(1) If mymonth = "Jan" Then mymonth = 1 End If If mymonth = "Feb" Then mymonth = 2 End If If mymonth = "Mar" Then mymonth = 3 End If If mymonth = "Apr" Then mymonth = 4 end if If mymonth = "May" Then mymonth = 5 end if If mymonth = "Jun" Then mymonth = 6 end if If mymonth = "Jul" Then mymonth = 7 end if If mymonth = "Aug" Then mymonth = 8 end if If mymonth = "Sep" Then mymonth = 9 end if If mymonth = "Oct" Then mymonth = 10 end if If mymonth = "Nov" Then mymonth = 11 end if If mymonth = "Dec" Then mymonth = 12 end if mydate = mymonth & "/" & myday & "/" & myyear & " " & workingtime mydate = CDate(mydate) mydate = mydate - .29166666 mydiff = DateDiff("d", mydate, now()) If mydiff > .9 Then mydiff = mydiff & " days ago" Else mydiff = DateDiff("h", mydate, now()) If mydiff > .9 Then mydiff = mydiff & " Hours ago" Else mydiff = DateDiff("n", mydate, now()) If mydiff > .9 Then mydiff = mydiff & " Minutes ago" Else mydiff = DateDiff("s", mydate, now()) If mydiff > .9 Then mydiff = mydiff & " Seconds ago" End If End If End If End If mytestmessage = split(mymessage(1), "http") myubound1 = ubound(mytestmessage) if left(mytestmessage(0), 2) <> " @" then if myubound1 > 0 then myvariable = myvariable & mytestmessage(0) & " <a href=" &Chr(34) & "http"& mytestmessage(1) & Chr(34) & ">http"&mytestmessage(1) & "</a>"& "<br>" & mydiff & "<br><br>" else myvariable = myvariable & mytestmessage(0) & "<br>" & mydiff & "<br><br>" end if loopcounter = loopcounter + 1 else End if counter = counter + 1 Loop Response.Write myvariable End Function %> <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en" dir="ltr"> <head> <title>Dave, a self portrait in words: life update.

Tuesday, June 26, 2007

life update.

just back from lunch, today is one of those days where several seemingly random things come together, and when you stop... take a step back.. and look you see how things are connected, how things that seem random really arn't. to paraphrase a movie that I enjoy... sometimes life seems like a mass of dots.. but from another perspective, life, everything even death, makes sence. its not just dots... instead we are all connected, and its beautiful and its funny and its good..... from this close we can't expect it to make sence.... right now.....

I had a on-line conversation with my friend kristina today... I have noticed that when we have a serious talk about somthing she can put things into such utter clarity in such simple words... she said "whatever happens will happen. But you smile and light up when you talk about him in ways you didn't in the past. That speaks volumes, the smile, the change in your tone of voice, your eyes widen. Its different, its good to see." I read that statement several times, it is somthing I have heard more than once now... but it wasn't until I read it that things started to fall into place. I told someone at one point that it was like when I was at the lowest part of my life I said... "this is what I need" and the universe was listening, and cam dropped into my life. Yes things are not perfect, and the timing could have been better, but who am I to not at least see where this goes, all my doubt and excuses. Well they were just that, doubt and excuses. I am trying very hard to not jump from one relationship to another, but at the same point I don't want to convince myself that I don't deserve this or worse yet that I don't deserve to be happy.
its very strange to look at the future now and see a haze now, but also to smile at the unknown, knowing that there is no limit to what could be... what is out there yet to be uncoverd for me... So many things I have not done that I want to... I smile just knowing that I feel control again for the direction that my life is going...

L came over last night and for the first time when he left, I didn't feel like I have made the wrong decision, that the choices I made were the best choices that I could have made with the information that I had at the time. I hope he figures out what he needs in his life and he finds a way to attain that and all the happienes he could ever desire. I also hope that I do not lose him as a friend... With some of the conversations we have had, I think it is a distinct possibility that we could grow out of each others lives, no matter how hard we might try not to. That thought makes me want to cry every time it crosses my mind... Kristina and I talked about this today as well. she put it into a analogy that made alot of sence to me... she said, "do you remember when you were a kid and you were putting together a puzzle, and there was that piece that you wanted to fit into a certin place, and no matter how hard you pushed it didn't fit there. but it fit very nicely in another area?" This is how it has always been with L and I. there was always somthing about us that just didn't fit as a couple... no mater how much we were alike in some ways, there were fundamental differences that made us our own person. these differences also made us not quite fit in this situation.

on an adverage day, I will sit here at my desk working with my music on random. and it amazes me how I will start to think about somthing, and a song will come on that has memories attached to it regarding the same thought. Music is SUCH a huge thing for me. I can cry, I can laugh, I can remoniss, or I can smile. so many beautiful memories in my life, so many tears shed. So much love, so much heartbreak. All of which makes me who I am today, someone who I never would have thought I could be when I was leaving home for the first time. Stong successfull, happy loving, caring, warm.

And the best is yet to come.

Labels: , , , , , , ,

0 Comments:

Post a Comment

<< Home