Search results

AFter some googling...I found this link http://bytes.com/groups/ms-access/450663-problem-error-go-event-procedure Then I added If me.dirty then me.dirty=False into my code...i even used resume...but the prob is the error message box pops up even on successful execution.

Sorry Dave... I missed to see the last line and called you Gemma...sorry :D

I am puttig the actual code....Please do help me out Gemma. Private Sub cmdadd_Click() On Error GoTo Error_Handle Dim todaydate todaydate = Now() 'setuser is a function already defined in another module.This works correct Dim updater As String updater = setuser() 'validations If...

please help...

If i give it to my reviewer and she renames it...then? the code won't work and she will get a error... so i want to remove dependency on name....:D

Here's a problem...i hope you can solve it...I don't understand where I am going wrong. Function test1234(....) On Error GoTo errorcode ... ... docmd.runsql "........" docmd.runsql "........" Msgbox "executed successfully" Exit Function errorcode: Msgbox "not executed" End Function The problem...

currently name of my database is tool.mdb...if i change it to some thing else...it won't work...how to remove this dependency... the error is in this part of the code strConn = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=" & CurrentProject.Path & "\tool.mdb;"...

I have been trying this for many days...but i have not got any result. I have even googled extensively. Please help me out in this. This is my last stop. I have to plot graphs based on data in a access table. the data is some thing like this Area Commodity Month Target...

Thanks Allan...looks like my post was put here twice...I DON'T KNOW HOW

Is there any way out...like having a lock on all tables...something like that..?

Thanks a lot for being so helpful...That worked well... One more issue...can you please suggest me on this... in the front end, if some one holds shift and opens, then he can see the data in all the linked tables...which he is not supposed to...How to change this.... Thanks & Regards

Hi, I split my database to backend and front end. my tutor wants it to be set up on "LAN" and she should be able to use the front end... The prob is it is working only if BE and FE are in the same folder... now how should i proceed... Please help me out. Thanks in advance

Hi, I split my database to backend and front end. my tutor wants it to be set up on "LAN" and she should be able to use the front end... The prob is it is working only if BE and FE are in the same folder... now how should i proceed... Please help me out.

Thanks DcRake

what's chr(34)...even i have the same prob...

Dim strWhere As String Dim lngLen As Long strWhere = strWhere & "([Name] Like ""*" & Me.txname & "*"") AND " 'See if the string has more than 5 characters (a trailng " AND ") to remove. lngLen = Len(strWhere) - 5 If lngLen <= 0 Then 'Nah: there was nothing in the string. MsgBox "No...

I think the prob is with those # marks...without those hash marks...if i hardcode the date, i get a wrong answer....i have to some how attach # to the date value which comes each time... like temp4="#" & rs!field4 "#" but i don't know how exaclty...the above when doesn't work

it is a date field....100%.... type used is medium date

I have wriiten a query based on one table t1...I run through that query and search for any records with same data in about 4 fields...if they match then proceed...

here is the body of my function sub updatedb() .... .... set rs.openrecordset(.....) rs.movefirst do until rs.eof dim flag1 as boolean dim temp1 as string dim temp2 as string dim temp3 as string dim temp4 as date temp1=rs!field1 temp2=rs!field2 temp3=rs!field3 temp4=rs!field4 'date field flag1=...