Hurray!!!!
<vb code>
Public Sub Fixed(database As Integer)
' Eric Fixed his database by re-entering all the entries
' Go him!!!
database = 1
If database = 1 Then
MsgBox "Hurray! It works!!!", vbExclamation, "Hurray!!!"
End
Else
MsgBox "F**k databases.... it still doesn't work...", , "
"
End If
End Sub
</vb code>
<edit>
Thanks to all who posted, if you can't understand the code above(I fixed it).
</edit>