I did the following and still same error message
With rsclone
Set .ActiveConnection = CN
.CursorLocation = adUseServer
.CursorType = adOpenKeyset
.LockType = adLockOptimistic
.Properties("IRowsetIdentity") = True
.Open stcnQL1, , , , adCmdText...
I replace my code with yours and it is moving paste that lind of code and giving me an error "run-time error 424 object required" at:
ActiveConnection = CN
any idea why this happen.
again it works fine with only one select criteria
The result should return the records meeting both critria. I have test this on one criteria and it work. what i can do is put a if statements that:
If Polookup1 <>"" then...........
else...
Msg"both criteria must have value"
end if
but that is beside the point....the main problem is that...
Below is my code. I am trying to select only the records meeting the two criteria and then clone the data to a datagrid. I need helo joining the two select statements. I have try "and"...but it does not work.. it says data mismatch.
there are two text box for user input for the select"...
Dear experts:
I have a program that I code and it worked fine. I need to make some changes to it. a year ago was when I last make changes. My computer crashed I re-install VB and now when I open the project back up and test run
VB is having comile error "can't find project or library" on...
Hi zarkon4,
It took me awhile to get back to this. I updated my OS to Windows 2000 professional. Ran the program but it says unable to get server time???
it is in your code, what do I need to do to get it to get server time?
Kay
Zakron4,
I paste the code in a new module. Ran the programe and it is giving me an error:
Can't find dll entry point netremoteTOD in Netapi32.dll
What does that mean? and do I replace "PUMPS" with our server name?
Kay
I am writing a time clock program. I don't want the user to be able to change the system date and time. Is there a way to restrict this?
Also Can I compare the date and time to the last punch in. For expamle if time or date is less than last person punch in then system gives error.
if so ...
I really need a way around this. I want to be able to update the record after it meets the two criteria
Please help me figure out what is the best way to go about this.
thanks
kay
I think the search criteria works. it is just in the call procedure.
It seems like this will not work. is there another way to pull a record based on mulitple criteria make changes and update the record.
it there is a better way please direct me.
thanks
kay
below is the code I try to get it to work.
the search criteria results are
searchcriteria="clockindate=06/27/2004 and socialsecno=586565441"
Code:
Dim Searchcriteria As String
Adohours.Recordset.MoveFirst
Searchcriteria = " clockindate = " + todaydate.Text + " And socialsecno =...
The error is stopping on the call statement after the criteria.
Call Adohours.Recordset.Find(Searchcriteria)
it seems like the criteria works but to call it so the current record is display that is where the problem is.
kay
Still the same error after quotes. please see what I am doing wrong:
Searchcriteria = "clockindate='" + todaydate.Text + "'" + " And socialsecno = '" & txtpassword.Text & "'"
erorr at runtime:
arguments are of the wrong type, are out of acceptable range or are in conflict with one another.
since txtpassword is a numeric field I used the following statement but there is a new error: oh, I rename date to clockindate.
Searchcriteria = "clockindate='" + todaydate.Text + "'" + " And socialsecno = " & txtpassword.Text
erorr at runtime:
arguments are of the wrong type, are out of...
I try the following and it comes back syntax error
Searchcriteria = "DATE='" & todaydate.Text "'" And "socialsecno = " & txtpassword.Text
if I put the + in front of and it comes back
Complie error: expected end of statement
Searchcriteria = "DATE='" & todaydate.Text "'" +And...
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.