Wednesday, October 28, 2009

Silence isn't nothing

I do have a plain and simple plan
and I'm so sure I don't have any fan
with this plan, I have started the race
It's set regardless of what people I face

While Fear and Shame lurking in my mind
I compartmentalize, conquer myself and find
the sea of people, fazed, intrigued about my disguise
the hate, wait, faith carved in their face as I shoot them with lies

I laugh to the fullest I think I'm the smartest
their ignorance completely describe how a failure they are
I'm not make believing because it's better than not knowing
I'm an ignoramus, better off leaving their mind confusing

With this plan that I'll lead I do not wish to succeed
instead, I just have to retain the recent status that people believe
people have been divided, defied and have been denied the truth
for my silence, never reached their minds because of a stupid fool
So I ain't gonna talk but I am gonna walk
to move forward, to motivate and talk
love drove me to stay this way although i know i'll be in shame
but I am sure, all will be pissed off at the end cursing me by name.
Does my silence puzzle your mind?

Sunday, October 25, 2009

A letter to B-One

Dear B1,

I am very thankful that you are so eager to come by here and spend time with me.
Though I know you have a lot to consider by the time I invited you, still you answered me positively with no hesitations. The only concern is whether the "higher authority" will let you go or not. But that's not the problem at all since few days after that you actually confirmed that you're coming. At first I am just grateful that finally! finally, there's a good friend whom I can bring at the night out. For a while I never thinked of you, I have in my mind that you'll come and it's given, I don't have to go further to you as my subject. My mind was focused on something that was actually nothing soon as I find out. Then things continue to progress and I started realizing that those something around me were actually nothing. It was empty, I feel like deserted, No I am deserted, I just feel like more than that. Then I actually removed the possibility of something and focuses on what I might have. Then I thinked of you, I remembered, I recalled you are not something. definitely not something, for you're the real thing.

Then I started thinking of you, the next time I know, I'm rationalizing. I asked myself Why? Why did you say yes? though you can say No that easily, there's a dozen of reasons why you have to say No and you end up saying yes. I'm not much of a good friend, I admit. I do make you laugh sometimes, but I do annoy you as well. I have never done something significant for you but Im sure you have done a lot for me. The votes and other stuffs I can't remember. as for what I've done for you, it's just a mere thanks everytime after you vote. So I clearly don't see any reason why you have to go. But then I answered in your behalf, by "what ifs" a lot of what ifs actually, I have thought a lot of good reasons and there could be a possibility that there's no reason at all. I'm puzzled, confused I overthink I questioned but all I have for an answer is my thoughts. Stupid move though I have learned If you want to know something about a person, then ask that person. Despite the fact that I know that, The truth is I'm afraid to ask, it might implicate an idea that I don't want you to go or other ideas you might think on why I asked that question. Then I ignored it and focus on you again. This time to know you more, we conversed and stay late night exchange a lot of ideas, invent jargons on us and a lot more.

I have to tell you it's fun. I would like having more of those, I would like to know more of you because suddenly you're interesting. I wish it could stay like this even after the night out. Also, I would like you to know that you've been a good friend, one of the best I've had. A friend to keep. This is my way of saying thanks, as you have said "I'm a man of words" I'll dedicate to you this epic post. Whether you like it or not it doesn't matter, the most important thing is the message that it'll deliver. If you have fun reading then thanks and If you don't I'm sorry for wasting your time. OVER and OUT.


Friday, October 23, 2009

Doubts and Changes

self evaluation of my doubts and the changes it may cause.

Thinking keeps me busy, I think in a lot of things a lot of activities a lot of ideas but I never end up thinking about a certain person for hours. Consumes my time though I'm having fun, well having conversations are fun but I don't really like conversations. Well hows that? Great! that's why I'm having doubts.
Connection, Yes, I feel somehow connected and I don't know why or is it just my imagination doing that? I 'm puzzled, I'm doubting.
Plus, I have observed that connection leads to closeness and closeness puts you in a certain position in a person's life but I don't even know if I have the capacity to try and involve myself to take a significant part on a persons life. Or maybe I'm wrong or rather I can simply try to know what it could be like. that's if I can. so this leaves me the option to explore more on what I can't do rather on focusing on what I can do. By doing so, Will I cross the boundaries and invade the unexplored part of myself? Will I take the risk? I don't know what lies there. Am I afraid? Maybe or maybe not. I don't know but I'm in the process.

to be continued for changes...(having a hard time dealing with it) lol

Sunday, October 18, 2009

Disabled Facebook Account

nangyari na ba sa inyo to? di ko mabuksan yung akin amp amp
disabled daw tapos bawal ipakita kung ano yung violated rule

ang labo, sayang record ko sa typing maniac saka speed typing dem dem

Friday, October 16, 2009

The Neutral Friend

I'm your neutral friend
I'm not a friend in deed
and definitely not that friend
when you're in need

I don't give any advice
but I do have some words
which can serve as a guide
to bother your time and add some spice

I'm far different compared to those stereotypes
yet I'm close being the ones with the positive insights
theres some point that I can develop something
and some point that I can ruin everything

I'm not really the type of friend to keep
and don't even bother to get involved with me too deep
for I can abandon all of you in an instance
so remember to keep your heads up and measure the distance

So am i good? or am I bad?
the answer is neutral, not chosing a side
well it is actually chosing a side
and that side is not chosing a side

maybe I'm somewhere in between?
altering the good and the bad at certain situations
maybe I'm not your friend?
pity you for considering me as one, because I don't

or this is just merely over thinking and this doesn't matter at all.
after all, you have a neutral friend to call. :))

Monday, October 12, 2009


bago matulog
gusto ko munang mabusog
sa mga flashes ng mukha mo sa screen
para sa panaginip ko nandun ka rin

uh. wala pa ring kupas!
fuck, malamang late ako nito bukas
pero ok lang dahil ikaw ay nasilayan
sapat na para ako ay maligayahan

so pano? pagkatapos ng ilang minuto
ako'y solve sa sarap ng specialty mo
hanggang sa susunod na madaling araw
magkikita tayo emow

Sunday, October 11, 2009

Simple Maintenance


Private Sub S_LOAD_FLEX()

Dim strsql As String
Dim rs_load As New ADODB.Recordset
Dim a As Integer

a = 1


strsql = "select * from book_tab"

With rs_load
.Open strsql, conn

If .EOF = False Then

Do While Not .EOF

flxBook.TextMatrix(a, 1) = !ISBN
flxBook.TextMatrix(a, 2) = !bookdesc
flxBook.TextMatrix(a, 3) = !bkpub
flxBook.TextMatrix(a, 4) = !bkaut
flxBook.Rows = flxBook.Rows + 1
a = a + 1

End If
End With

If flxBook.Rows > 2 Then
flxBook.Rows = flxBook.Rows - 1
End If
End Sub

Private Sub S_SET_FLEX()

With flxBook
.Cols = 5
.Rows = 2
.AllowUserResizing = flexResizeBoth
.SelectionMode = flexSelectionByColumn
.ColWidth(0) = 200
.ColWidth(1) = 1500
.TextMatrix(0, 1) = "ISBN"
.ColWidth(2) = 1500
.TextMatrix(0, 2) = "BOOK NAME"
.ColWidth(3) = 1500
.TextMatrix(0, 3) = "PUBLISHER"
.ColWidth(4) = 1500
.TextMatrix(0, 4) = "AUTHOR"

End With

End Sub

Private Sub cmdAdd_Click()
cmdAdd.Visible = False
cmdSave.Visible = True

End Sub

Private Sub cmdDelete_Click()
Dim strsql As String
Dim rs_del As New ADODB.Recordset
Dim ans As Integer

ans = MsgBox("Are you sure you want to delete this record?", vbYesNo)

If ans = vbYes Then
strsql = " delete from book_tab" & _
" where isbn ='" & txtISBN & "'"

rs_del.Open strsql, conn
MsgBox "record deleted"



End If

End Sub

Private Sub cmdEdit_Click()
cmdEdit.Visible = False
cmdEsave.Visible = True

End Sub

Private Sub cmdEsave_Click()
Dim strsql As String
Dim rs_save As New ADODB.Recordset

strsql = "update book_tab set " & _
"bookdesc = '" & txtBkName & "'," & _
"bkpub = '" & txtPub & "'," & _
"bkaut = '" & txtAut & "'" & _
" where isbn = '" & txtISBN & "'"

rs_save.Open strsql, conn

MsgBox "Record Updated"


cmdEdit.Visible = True

End Sub

Private Sub cmdExit_Click()
End Sub

Private Sub cmdSave_Click()
Dim strsql As String
Dim rs_add As New ADODB.Recordset

strsql = "insert into book_tab " & _
"(isbn,bookdesc,bkpub,bkaut) " & _
"values(" & _
"'" & txtISBN & "'," & _
"'" & txtBkName & "'," & _
"'" & txtPub & "'," & _
"'" & txtAut & "') "

rs_add.Open strsql, conn

MsgBox "Record Added"


cmdAdd.Visible = True


End Sub

Private Sub flxBook_Click()

txtISBN = flxBook.TextMatrix(flxBook.Row, 1)
txtBkName = flxBook.TextMatrix(flxBook.Row, 2)
txtPub = flxBook.TextMatrix(flxBook.Row, 3)
txtAut = flxBook.TextMatrix(flxBook.Row, 4)

End Sub

Private Sub Form_Load()
End Sub

Module code(connection String)

Public conn As New ADODB.Connection

Public Sub main()
Set conn = New Connection
conn.ConnectionString = "Provider = MSDASQL.1; Data Source = Book_cn"


End Sub

Public Sub CLEAR_ALL_TXTBOX(frm As Object)

Dim obj As Object

For Each obj In frm
If TypeOf obj Is TextBox Then
obj.Text = " "
End If
Next obj

End Sub

here's a simple vb program that can add, update and delete record.
Provided with code, you just have to copy and paste it in your code window then provide the right interface and object names for you to be able to run it smoothly.
as for the database, you need the MyODBC 3.51 driver and you have to create the fields on SQL table. field names are given, make sure that you entered the right field name to avoid errors while running the program. just refer on the pic. above for database setting.
btw this program doesn't include restrictions and validations on it.

questions? feel free to pm or mail me: