Frustrations

Friday, April 15, 2005

Things that are bugging me today...

There's a woodpecker working in the woods just next to my office. It's making a fantastic sound as it hammers away in a dead tree trunk. I really want to get a picture of it but every time I go outside with my camera it's flown off.
Gonzo won't land in the bucket.
Michael Howard's face is getting more punchable by the day.
I can't decide what wedge sandals I should buy from Next.

The only thing that cheered me up a little was this item on my local news broadcast last night. Check out the audio link to hear the 999 call made by an eight-year-old girl who thought her mummy just had a "belly ache", and found out half way through the call that her mummy was actually giving birth to a totally unheralded baby boy!

Siobhan Curran Combine all four things! Smack Gonzo in the backside with the wedges, so that he flies across the room and hits Michael (Evil) Howard in the face, and then. Um.

OK. Three things

Poly Becky! You're blogging :O

Hope all is well!

Poly

Emma Omg that that 999 call is so funny! (obviously not for the mum)

Post a CommentPermalink Subscribe to comments: this post | all posts

<< T*Blog Home

Live Blogroll

<% Sub atom(URL) Set objXML = Server.CreateObject("msxml2.DOMDocument.3.0") objXML.async = false objXML.setProperty "ServerHTTPRequest", True objXML.validateOnParse = true objXML.preserveWhiteSpace = false dim uniques(75) itemno = 0 If Not objXML.Load(URL) Then Response.write "

ERROR
code: " & _ objXML.parseError.errorCode & _ "
Linea/Col: " & _ objXML.parseError.line & "/" & _ objXML.parseError.linepos & "

" Else Set objNodeList = objXML.getElementsByTagName("entry") For Each objNode In objNodeList itemno = itemno + 1 For Each objNode2 In objNode.childNodes Select Case objNode2.nodeName Case "source" For Each objNode3 In objNode2.childNodes Select Case objNode3.nodeName Case "title" StrSource = objNode3.text end select next Case "issued" strdate= left(objNode2.firstChild.nodevalue,10) Case "link" strURL = objNode2.GetAttribute("href") Case "title" strTitle = objNode2.firstChild.nodevalue End Select Next uniqueitem = 1 if itemno > 1 then for i = 1 to itemno - 1 if uniques(i) = strSource then uniqueitem = 0 end if next end if if uniqueitem = 1 then hasBreak = inStr(strTitle,"
") if hasBreak > 0 then strTitle = left(strTitle,hasbreak-1) end if strTitle = replace(strTitle ,chr(146),"'") strTitle = replace(strTitle ,chr(145),"'") strTitle = replace(strTitle ,chr(147),"""") strTitle = replace(strTitle ,chr(148),"""") Response.write "

" & strTitle & "

From " & strSource & "

" uniques(itemno)=strSource end if strTitle = "" strURL = "" strDescription = "" strSource = "" Next set objNodeList = Nothing End if End sub call atom("http://www.google.com/reader/public/atom/user/16312145566598809567/label/blogroll?n=75") %>

Archives by Month

Previous Posts

Subscribe

Becky's T-Blog

Friday, April 15, 2005

Frustrations

Live Blogroll

Archives by Month