Due Date

[SeaHag]

I have to make a program void after 90 day.. and warn at
85..
I have code... but need help with captions?

Any help appreciated..
Thnks

Private Sub Form_Load()
 
Dim DueDate As Date
    DueDate = "6/15/2002"
Dim WarningDdate As Date
    WarningDdate = "6/10/2002"
    
        If WarningDdate < Date Then
        
            If DueDate < Date Then
                MsgBox "Outdated Pricing. Please update...", vbCritical
            Else
            Dim days As Integer
                days = DueDate - Date
        
                MsgBox "Pricing in effect for " & days & " days", vbInformation
            End If
        End If
End Sub
 
 
Seahag

[kleinma]

Private Sub Form_Load()
 
Dim DueDate As Date
    DueDate = "6/15/2002"
Dim WarningDdate As Date
    WarningDdate = "6/10/2002"
    
        If WarningDdate < Date Then
        
            If DueDate < Date Then
                MsgBox "Listen cheapo time to fork over some more loot.. unless you got this awesome app hacked off morpheus or something.. in which case im gonna find u and kick ur a$$!!!...", vbCritical
            Else
            Dim days As Integer
                days = DueDate - Date
        
                MsgBox "Your still safe for " & days & " more days", vbInformation
            End If
        End If
End Sub
 
 
Seahag

[SeaHag]

very funny

Your on the right trak...
This is for internal usage... so its got to be a little
more tact

[kleinma]

Originally posted by SeaHag
very funny

Your on the right trak...
This is for internal usage... so its got to be a little
more tact

if it is for internal use.. then why must they pay for it??

man i wish i could charge the users here for usin my apps

BTW I think you captions are fine..
maybe change
"Outdated Pricing. Please update..."
Outdated Pricing just doesn't sound exactly right to me..
Maybe something like
"Program License has expired. Please update..."

SOMETHING like that.. probably not exactly that

[SeaHag]

this is a company catalog.

Our distribution offices (listen to this)
dont like to sell out ouw equipment.. ga.!
They say looking through a bunch of binders was too clumsy..

So i came up with a pricing catalog..

I will look at your suggestions.
thnks..
(me english aint so good)

[csnyder]

Oh, are you just looking for grammatically correct language? You can say "The prices are outdated. Please update them immediately." and "Prices are in effect for xx more days."

[SeaHag]

thnks all...

heres what someone suggested here.

Dim DueDate As Date
    DueDate = "6/18/2002"
Dim WarningDdate As Date
    WarningDdate = "6/11/2002"
    
        If WarningDdate < Date Then
        
            If DueDate <= Date Then
                MsgBox "Pricing has expired.  Program aborting...", vbCritical
                End
            Else
            Dim days As Integer
                days = DueDate - Date
                MsgBox "Pricing valid for another " & days & " days", vbInformation
            End If
        End If

??

[kleinma]

how come when the prices expire you app becomes no good?? can't you update the prices somehow so your app will always be good?

[James Stanich]

Originally posted by kleinma
how come when the prices expire you app becomes no good?? can't you update the prices somehow so your app will always be good?

I agree. You should include an admin module that would allow someone to update the prices...either manually, or thru import of data, from say a textfile...

[SeaHag]

200+ computers.
Our cost fluctuate.. for example.
Galvanized steel 2 weeks ago was 45cents/lb
now theres terrifs.. 85cents/lb.

50000lbs .. diference is 20,000 bucks.
WOW..
We just want to force them to update the pricing
regularly..

We will issue updates every 70 days or so.

[SeaHag]

Originally posted by James Stanich


I agree. You should include an admin module that would allow someone to update the prices...either manually, or thru import of data, from say a textfile...

Ya.. thats me.... heheh.
I do the costing... (better hope i got it right)
I am using access. I will make a updater.. to replace the database via email....
Eekkk.. (my job is on the line.. . i said "Sure i can do it")

[csnyder]

I'd still suggest that when the price expires, the message says something about them needing to update the prices. Yeah, you kind of expext people to realize that, but instructing the user about what to do is important. It makes it more user friendly, IMO, anyway.