<% 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: Simpely being loved

Wednesday, April 7, 2010

Simpely being loved

Listening to a dance song, its title "Simply Being Loved" thought about about that for a minute, as I was listening. seems simple. Being loved.... So many people... myself included... find it such a difficult thing. To be loved that is. I have spent many hours thinking about the how's and why's that is the case, I seem to always come back to I just don't know.



Its not that I have never felt that I have been loved, because I have. Maybe its a self worth thing, maybe its just because of how I see my self, maybe it has to do with experiences I have had in my childhood.



I wonder how many other people in the world also feel the way I do, either consciously or unconsciously. my bet is far more than one might think at the surface of the thought.



The simple feeling of being loved. Are we afraid of the hurt that may come if that love were to go away? Logically I can think about it and know that it is part of the process. that has never made it any easier. As humans we seem intent on hurting each other mentally or physically in order to make ourselves feel somehow better, bigger, stronger.



Sad, how much better the world could be if everyone took that same energy and used it to help others, to make them feel better about themselves, to encourage them. Many times I have wished that I did not have thoughts like this. Seems like it would be so much easier to go through life with no thoughts or feelings of my own.



It does not take much for me to feel the pain that someone goes through, to picture how they see the world, how they feel about the things that surround them. Sometimes it is very much a blessing, more and more lately... it is really hard to see, and feel what people go through on a day to day basis, and not try and think of some way I can make it better. Just one person, and I can't save the world. That does not mean that I don't want to, that I don't want to make things better for everyone, especially those I care the most about.



" So little time so little time to work it on out, I feel I'm stumbling in the dark. I praying for love, love love.. is more than enough.. simply being loved loved loved, is more than enough"



I think I would have to agree.....

-D

Labels: , ,

0 Comments:

Post a Comment

<< Home