If you are referring to your date field as "right(c.checkdate,4) + left(c.checkdate,4) " you need to have the year first in the string following the "between", e.g. '20011/1/'. You are also not allowing for the fact that your month & day strings can be 1 or 2 chrs long.
Hope...
I notice one of your fieldnames is "Date", which is a reserved word. I've had trouble in the past where I've used reserved words as fieldnames or table names. Try using a different name...
Hope this helps,
Ralph
I've always found you get best performance having your program file stored locally (say C-drive), even if any data accessed may be on a server, and if your app is multiuser.
Any reason you specifically want to have your program only on a server?
Ralph
...however, if you prefer to use SQL, begin your statement:
"SELECT Field1 FROM tblTable" etc.,
instead of "SELECT tblTable.Field1.Value FROM tblTable"
Ralph
I wouldn't use SQL for this. It seems a bit complicated when FindFirst will do the job.
Instead I'd try:
with data1
.RecordSource = "tblTable"
.Refresh
myCriteria = "id = '" & Text1.Text & "'"
myCriteria = myCriteria & " And contents = '" &...
If you already know which menu items you want to add, I would create them, but make them invisible, programmatically making them visible as needed.
Hope this helps.
Ralph
I use:
AppRunning = True
AppActivate "Calculator"
If AppRunning = True Then
SendKeys "%{F4}", True
AppWasTerminated = True
End If
Hope this helps.
Ralph
To resize columns at runtime:
With MSHFlexGrid1
' set grid's column widths
.ColWidth(0) = -1 'default
.ColWidth(1) = 3000
.ColWidth(2) = 2000
.ColWidth(3) = 0
End With
For your question 2, try:
Private Sub MSHFlexGrid1_Click()
With...
If you already know the sizes of your pictures you could programmatically resize your control to suit, or use several picture controls of varying sizes.
Ralph
I'm trying to do something similar at the moment.
The best I've done so far (better suggestions would be most welcome) is:
Private Sub MyCombo_LostFocus()
DoRefresh
End Sub
Private Sub cmd_Refresh_Click()
DoRefresh
End Sub
Private Sub DoRefresh()
textbox1.Text = ""...
Run-time error 3043 is a "Disk or Network error"
An internal disk or drive failure prevents reading from or writing to the disk.
Possible causes:
You tried to use a network drive, and the network is temporarily busy, or you're no longer connected to the network. Check the network...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.