Think Pink

Basic feed (just the blog)

The Uberfeed (blog, pics & links)

Sunday, October 16, 2005

Jane and I went to Angelic at the Pink Punters on Saturday night. It was nice to get out and about again, for the first time in what seems like ages!

I think I was the pinkest punter there. ;-)

I think someone mentioned the other day that I'd not taken any pics of me with my new camera yet. Consider that remedied, thank to a potential future David Bailey of the tranny world, Jane! She even remembers to get the feet in!

Labels: photos

Jane She even remembers to get the feet in!

And sometimes they are in focus. ;-)

yezut - old french for "How Pink?"

Connie Was great to meet Jane and to say a brief hi to you Becky.

Kaye and Sarah Hi Becky and Jane,
Glad to see you two are getting on great. Love the outfit, pretty in pink.

Lana Cool pic, pink suits you :)

pb at last a pic of you taken with your new camara!! all i can say is
"pretty in pink"

Tilda J You are daring with that short skirt! Looks good on you, though.

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

Sunday, October 16, 2005

Think Pink

Live Blogroll

Archives by Month