108508188421327220

script: iTunesAlarmClock.py

after spoonboy borrowed my alarm clock, i got to using the neat alarm clock plugin for xmms on my linux box to wake me up. but lately, i’ve been using my windows box a lot which has itunes. i found references to a couple applescripts to provide alarm clock functionality for mac itunes. with the recent release of itunes 4.5 for windows and a com interface, i decided to write something similar in python for windows. [view script]

108416667269565614

what the kids want cd release show

friday june 4, 2004
8pm at rhino’s (325 s. walnut st.)
$2 for admission or $5 for admission and cd!

WHAT THE KIDS WANT – cd release show for “loud quiet loud” cd on smack dab
in the middle records
DEFIANCE, OHIO
CHAIN REACTION
PSYCHIC SISTER
FEATHERWEIGHT MC

1084700863812019

updating online inventory from access

Private Sub compute_status()
  Dim Order_date As String
  Dim Receipt_date As String
  Dim resale_date As String
  Dim returned_date As String
  Dim cancelled_date As String
  
  Order_date = Nz(Me.Order_date, "NULL")
  Receipt_date = Nz(Me.Receipt_date, "NULL")
  resale_date = Nz(Me.resale_date, "NULL")
  returned_date = Nz(Me.returned_date, "NULL")
  cancelled_date = Nz(Me.order_cancelled_date, "NULL")

  If Order_date = "NULL" Then
    If resale_date = "NULL" Then
      Me.status = "In Stock"
    Else
      Me.status = "Sold"
      DoCmd.RunSQL ("UPDATE inventory1 SET sold = 1 WHERE inventory_id =" & Me.inventory_ID)
    End If
  Else
    If returned_date = "NULL" And cancelled_date = "NULL" Then
      If resale_date = "NULL" Then
        If Receipt_date = "NULL" Then
          Me.status = "On Order"
        Else
          Me.status = "In Stock"
        End If
      Else
        Me.status = "Sold"
        DoCmd.RunSQL ("UPDATE inventory1 SET sold = 1 WHERE inventory_id =" & Me.inventory_ID)
      End If
    Else
      Me.status = "Rescinded"
      DoCmd.RunSQL ("UPDATE inventory1 SET sold = 1 WHERE inventory_id =" & Me.inventory_ID)
    End If
  End If
End Sub