A MarketPlace of Ideas

Senator McCain-Stop the Senator Speak or lose the election

Monday, September 29th, 2008

Senator McCain went on and on in a Senatorial display of windyness after the bailout failed.

John we are going to need you to keep a wildly liberal congress under control. You must win. ( unfortunately )

Be simple and straight forward - oppose the bailout - we’re better off suffering through a depression than selling out democracy for scrit paper money
Paste Obama with supporting this massive government corrosion of our currency and interpersonal trust!

Two senators running for president. The country should go heavy into wind power. With just McCain and Obama we can put OPEC out of business!

Posted in Oh-No, Political | No Comments »

Any economic recovery will include nonpaying homeowners being removed from their houses

Monday, September 29th, 2008

In all the bailout plans democrats in particular are trying to talk up keeping people in their houses. This is a prescription for prolonging the pain. The reason we’re having a financial crisis is nonperforming assets. To translate that "people who are not paying their mortgages". It is only when the assets are in the hands of responsible owners that they will be performing again!

On an additional note anytime an operator says tries to put the rush on a move you need to watch out for the Ponzi for the scheme is failing and they need to fund out previous marks.

Posted in Spotting-Charlatans | No Comments »

Visual Basic PropertyBags to remember Parameters-Its in the Bag

Monday, September 29th, 2008

Recalling UserControl Properties

Standard controls have properties you can set using the object browser. The next time you bring up your VB program for editing you need to be able to recall the state of these settings. Example #3 on this page shows how to use a PropertyBag to remember these settings.

VB property bag explained
VB property bag example 2 with source code - general usage for parameter storage

BagMan PropertyBag Example

Storage to the Bag

Save to the Bag - Fill up the object to be saved to disk

Stuff it in the Bag - The actual file operation to put on disk

Private Sub cmdSave_Click()

Dim objBag As New PropertyBag

    With objBag
        .WriteProperty "Str", "A string"
        .WriteProperty "Num", 666
        .WriteProperty "Bool", False
        .WriteProperty "Mascot", SuperBagMan.Picture

        SaveBagContents .Contents, App.Path & "\Things.bag"
    End With

    Set objBag = Nothing

End Sub

Private Sub SaveBagContents(Contents As Variant, FilePath As String)

Dim FileNum As Integer

FileNum = FileSystem.FreeFile()

    Open FilePath For Binary As FileNum
        Put #FileNum, , Contents
    Close FileNum

End Sub

Retrieval from the Bag

Recall the Bag contents from disk

Dump the Bag - The actual file operation to get contents from disk

Private Sub cmdLoadBag_Click()

    Dim objBag As New PropertyBag
    Dim TestInt As Integer

    BagReadOut.Text = ""

    With objBag
        .Contents = LoadBagContents(App.Path & "\Things.bag")

        Display "Str = " & .ReadProperty("Str", "[No value]")
        Display "Num = " & .ReadProperty("Num", "[No value]")
        Display "Bool = " & .ReadProperty("Bool", "[No value]")
        Display "———————————————–"
        Display "The next value is purposely left off the storage list and thus it uses the default value specified in the .ReadProperty statement"
        Display "NotInBag = " & .ReadProperty("NotInBag", "[No value]")

        Set Image1.Picture = .ReadProperty("Mascot", "[No value]")

        TestInt = CInt(.ReadProperty("Num", "[No value]"))

    End With

    Set objBag = Nothing

End Sub

Private Function LoadBagContents(FilePath As String) As Variant

Dim FileNum As Integer
Dim tempContents As Variant

FileNum = FileSystem.FreeFile()

    Open FilePath For Binary As FileNum
        Get #FileNum, , tempContents
    Close FileNum

LoadBagContents = tempContents

Posted in Coding, Visual-Basic | No Comments »

Creative useful ideas for sellers names on ebay

Monday, September 29th, 2008

One of the funniest things I ever saw on ebay was the name of the user. They chose the following name

AuctionOver

What is so funny about this is that when you first saw it you thought oh damnit….I missed the bidding. Now this only worked for about 1/2 a second on me but anyone who did not look closely would just keeping clicking and skip bidding. Thus this humorous user would get better prices on that which he bought.

Posted in ebay | No Comments »

International Citizens Band Radio day October Fourth 10-4

Monday, September 29th, 2008

International Citizens Band Radio day October Fourth *( 10-4 ) will soon be upon us. Do you have your CB radios in working order and ready to transmit ? Make sure no miscreant has pinned your coax. Fire up your radio and make sure everything is ready for TEN-FOUR.

In America Its customary to give gifts on this day. Have you bought your wife the Bearcat scanner she’s had her eye on?

Posted in Funny-NewsParody | No Comments »

Sandals stink a bit-How do you get teva rubber sandals to stop stinking after you sweat in them? Stopping teva sandals stinking

Monday, September 29th, 2008

How do you get teva rubber sandals to stop stinking after you sweat in them.? My Teva sandals smell a little bit. How can I get them to stop kickin? Use my sandal mummification process.

My solution is easier if you have 2 pairs. Get an old shoebox and dump a bunch of Borax in it. Take one pair and and bury them cover them in Borax. Let them rest their for a while. This works pretty well in Arizona where its very dry. The Borax sucks the moisture out and a bit of it diffuses into the sandal material. Borax is antibacterial and you will find your sandals smelling alot better. You can do this on a nightly basis but what works best is to leave them in the borax a week so you do not have to dust them off everyday. Simply pull out the ones that have been mummifying for a week and put your second pair in. Then you always have a stink free pair.

Posted in General-Living | No Comments »