Thursday, January 29, 2015

Iran calls for assasination of Netanyahu's children

(If you don't know who Netanyahu is, he's the Prime Minister of Israel.  Not exactly the same thing as president, but kind of equivalent.)

This story, by the Washington Free Beacon, popped up briefly on Google's news aggregator, then disappeared.

Iran is encouraging its terror allies to pursue the assassination of Israeli Prime Minister Benjamin Netanyahu’s children by publishing personal information about them, including photographs of the kids lined up in crosshairs, and declaring, “We must await the hunt of Hezbollah.”


Wednesday, January 28, 2015

Feminist Women Need Our Protection 

 

From Ace of Spades: 

"[W]omen are such fragile, delicate creatures, utterly maladapted to this world, that they should be confined to large farms where they can organically till the soil and sing goddess songs during their sisterhood rites while protected from masculine technology such as written language, harsh words, standards, and sarcastic eye-rolling... "

If I accepted Feminists' own views of their fellow women."

Its 5 o'clock somewhere


Might as well join 'em.  No one likes to drink alone.

The Most Pesticide-Heavy Fruits And Veggies Of 2014



When I do a garden, I always do it organically. I believe you can have better, larger, and more abundant food that way.

Which makes me wonder, "why are organic products more expensive?" Just because it has the word organic on it. So, I don't buy organic products, because I don't like dishonesty.


However, I might start buying organic potatoes. Apparently they soak up more pesticides than pretty much any other food in the supermarket.  Makes sense, when you think about it.  Pesticides are sprayed on the plant above ground, they soak into the ground, and the potato sits there and absorbs all the gunk.  If that line of reasoning is correct, then even washing the potato won't help you remove the pesticides.

However, I have some doubts about some of the other veggies and fruit that show up on the EWG's (Environmental Working Group) "Dirty Dozen" list.  Reason being, they have explanations such as "A single Snap Pea sample carried 13 different pesticides."  A single sample?  Other explanations tell us, "over 99% of apples sampled" tested positive.  So what am I to make from the 'single sample' explanation?  Were a lot of the samples pretty bad, but in one case they were horrible, or were all samples clean except one?  Given that Greenies have no compunction to tell the whole truth if untruth fits the overall narrative better, I'll take my chances that Snap Peas are just fine.

This is fun! 


When you change your Facebook language to 'Pirate' a bunch of messaging changes. As an example, instead saying "Joe Blow likes your post" it tells me "Joe Blow fancies yer scrawlin' ". Hehe. I like that.

Here's how.


At the top of your Facebook window, look for the down arrow to the right of 'Home', 'Find Friends' etc.  It should be the last item on that bar.  Click on that down arrow and choose "Settings."  If you don't see an option for "Language," look on the left hand margin and click on "General."

To the right of the word Language you'll see a blue "Edit." When you click on this a window pops up which allows you to select a lot of languages including "English (pirate)."

I think Facebook should add more options, like "Ebonics" and "Jive."  So, if someone comments it would be like, "Yo niggah, dat bitch Shelly jus dissed you"

Microsoft to release a free version of Power BI.


It gives you ability to create some truly amazing dashboards, easily link tables, expose data from SQL servers, and lots of other really cool stuff.

This video is long, and its dated (2013), but it does give a detailed overview.  Note that the free version may not include everything in the video:

Marriage:


My friend Lærke tells me that in Danish the word "Gift" means "married" and "poison."

Global Warming in Real Time


I'm agnostic on the causes of global warming (why do people have to make things up, or lie, if they have the truth on their side?), but there's no doubt there has been warming, as this video clearly shows:

Wednesday, April 18, 2012

Log Off all users on a Shared Access Database

You created a shared Access program on your intranet and now you need to open Access exclusively but other users are logged on.  How can you log them off?

Here's one way:  Shut Down a Shared Database

.

Hiding the Access 2010 Navigation Bar withVB

You can hide the Access Navigation Sidebar in the Access Options/Current Database, but what if your user unhides the it using the same method?

How about hiding the Nav Bar with VB when a form is opened? Here's how:
Private Sub Form_Load()

    ' hide the Navigation SideBar
    DoCmd.SelectObject acTable, , True
    DoCmd.RunCommand acCmdWindowHide
       
End Sub
Want to hide both the Navigation Sidebar and the Access Ribbon? 
Change the above to this:
 Private Sub Form_Load()

    ' hide the Navigation SideBar
    DoCmd.SelectObject acTable, , True
    DoCmd.RunCommand acCmdWindowHide
   
    ' hide the Access Ribbon
    DoCmd.ShowToolbar "Ribbon", acToolbarNo
       
End Sub

Oh, but what if you want control over hiding/unhiding the Nav Bar and the Ribbon as the administrator, so you can work on the database?

You've got a few choices.  You could put an 'Easter Egg' on your form.  Say, for instance, you type a single period in a label someone at the top of the form.  It will be barely visible, and probably mistaken for a bit of dust on the monitor, or a glitch in the colors on the form.  Change its color to be nearly the same as the form, or even exactly the same, to really reduce its visibility.  Then, use the reverse the code above in its 'On Double Click' property to restore the Nav Bar.

Or, you create a logon form to capture users as objects when they first open the program, and set up view levels based on that.  Assuming we've logged on as the administrator, and our User.AccessID is 1, then we can create buttons on the form to show or hide the Navigation Bar and Ribbon as follows:

Create two buttons on your form.  Name one unhideNavBar_btn, and the other hideNavBar_btn.  Place them on top of each other, and set their visible property = No.

Then create two more buttons on your form.  Name one unhideRibbon_btn, and the other hideRibbon_btn.  Place them on top of each other too, and of course set their visible properties = No also, just like you did above.

When we load the form we'll need to check to see if these buttons should be visible, so amend your On Load event to this:


Private Sub Form_Load()
              ' hide the Navigation SideBar
                DoCmd.SelectObject acTable, , True
                DoCmd.RunCommand acCmdWindowHide
   
               ' hide the Access Ribbon
                DoCmd.ShowToolbar "Ribbon", acToolbarNo

       If User.AccessID = 1 Then ' this is the Administrator account
            [unhideNavBar_btn].Visible = True ' show the button to unhide the Nav Sidebar            [unhideRibbon_btn].Visible = True ' show the button to unhide the Access Ribbon
       End If
           End Sub

For your buttons themselves, you'll need to add properties to their click events.  Here's one example, which you'll need to add and modify for each of the four buttons we created above:

Private Sub unhideNavBar_btn_Click()
    ' SHOW the Navigation Bar (this is only available to the "Administrator")
    DoCmd.SelectObject acTable, , True
    hideNavBar_btn.Visible = True ' toggle the button that's visible
    select_TM_cbox.SetFocus ' set the focus to another control on your form (rename TM_Cbox to another control on your form)
    unhideNavBar_btn.Visible = False ' toggle the button that has the focus
End Sub