Access 2007 has hung up while I scrolled from left to right through the columns in a linked ODBC table in datasheet view. I understand why it "hangs" while scrolling through rows, but I've never heard of it doing this for columns and I am talking about a complete freeze up here.
I have this problem that when I update the value in one of my tables, MS Access hangs up. I don't know why. I dont know if it's because of the updating or because of something else.. Any help would be greatly appreciated.. Thanks in advance! ;)
here the code that's executed when the approve button is clicked..
Private Sub Command43_Click()
Answer = MsgBox("Are you sure you want to approve this timesheet? Note that only projects approved by respective project managers will be approved.", vbYesNo) 'if cancelled If Answer = vbNo Then Else Dim rs As Object Dim x As Integer 'will be used as a flag for do while loop
x = 1 'initialize flag Set rs = Me.Recordset.Clone
'finding the first record wich matches the weekending doesn't give the right record 'right away. it may give a record with the right weekending but different eno. that is 'not supposed to happen. so once a weekending match is found, check if the eno also 'matches. this do..while loop will do the trick =) Do While x < 18 If rs!eno = Forms!TimesheetDetailsFrm!eno And rs!statusPM = "approved" Then rs.Edit rs!status = "approved" rs.Update x = x + 1 End If rs.FindNext "[weekending] = #" & Format(Me![weekending], "mm/dd/yyyy") & "#" Loop
'close this form and refresh the 'timesheets for approval' form Answer = MsgBox("You have successfully approved the timesheet. Close this window to continue viewing other submitted timesheets.") Forms!SupervisorFrm.Requery End If
End Sub
Thanks again..
ps. How do I mark a post as 'resolved'? Coz I have a previous post which has already been solved.. Thanks to all of you guys. ;)
My Access app hangs when running the following code on Form_Load:
VB Code: Original - VB Code Private Sub Form_Load()On Error GoTo listbox_errorDim strSQL As String, strList As StringDim listrs As New ADODB.RecordsetSet listrs = New ADODB.RecordsetstrSQL = "SELECT * FROM sections"listrs.LockType = adLockPessimistic With listrs .ActiveConnection = open_conn() .Open (strSQL) End WithDo Until listrs.EOFstrList = strList & listrs("id").Value & ";" & listrs("section").Value & ";"LoopstrList = Left(strList, Len(strList) - 1)Me.cmbSection.RowSource = strListMe.cmbSection.RowSourceType = "Value List"listrs.CloseSet listrs = Nothinglistbox_error:MsgBox Err.DescriptionExit SubEnd Sub Private Sub Form_Load()On Error GoTo listbox_errorDim strSQL As String, strList As StringDim listrs As New ADODB.RecordsetSet listrs = New ADODB.RecordsetstrSQL = "SELECT * FROM sections"listrs.LockType = adLockPessimistic With listrs .ActiveConnection = open_conn() .Open (strSQL) End WithDo Until listrs.EOFstrList = strList & listrs("id").Value & ";" & listrs("section").Value & ";"LoopstrList = Left(strList, Len(strList) - 1)Me.cmbSection.RowSource = strListMe.cmbSection.RowSourceType = "Value List"listrs.CloseSet listrs = Nothinglistbox_error:MsgBox Err.DescriptionExit SubEnd Sub
The connection is in a module named publicfunction: VB Code: Original - VB Code Public Function open_conn() As ADODB.Connection 'Opens connections to database Dim sPath As String sPath = CurrentProject.Path & "endjftocbe.mdb" Set open_conn = New ADODB.Connection With open_conn .Provider = "Microsoft.Jet.OLEDB.4.0" .ConnectionString = "Data Source=" & sPath & "; Jet OLEDB:Database Password=*****" .Open End WithEnd Function Public Function open_conn() As ADODB.Connection 'Opens connections to database Dim sPath As String sPath = CurrentProject.Path & "endjftocbe.mdb" Set open_conn = New ADODB.Connection With open_conn .Provider = "Microsoft.Jet.OLEDB.4.0" .ConnectionString = "Data Source=" & sPath & "; Jet OLEDB:Database Password=*****" .Open End WithEnd Function
Any ideas why it is hanging? The conn to the database is successful when I use it for the login procedure, but after that, I can't seem to get back in.
When converting the Front End of my database to an MDE, Access just hangs and says (Not Responding). I've left it our an hour and there's no sign of stirring.The Back End converts in just a second or so.
I'm having an application which is developed in access. It's running quite well, some times when I made changes to forms or reports it hangs for a while and exits without saving, it happens sometimes not always... what could be the problem? how can I rectify this..
I am facing a recent problem in my access 2002 and access 2010 on my computer. I am not able to run new queries even simple ones because when I try to execute it , it starts to hangs and access stop responding.
I have hyperlinks from within Access forms that link to Adobe PDF documents; these are the new PDF Package documents created with Acrobat 8 - and give the message "Multiple files are bound together in this PDF Package."
The problem I am having is that when ever I click on the hyperlink the computer hangs (from the task manager, I believe that it is Acrobat Reader that is hanging). This problem only occurs with multi-file PDF packages and does not occur with regular PDF's. It also only occur with MS Access, as linking to theses files from MS Word encounters no problems.
Some of my users do not have access to all of our servers. In trying to automate I've hit one user whose system hangs up when Access tries to write to a server folder she does not have write (or even read) permissions for (Error 52, Bad file name or number). See the "Me.CitationType > 500" line below.
Code: Private Sub comboStatus_AfterUpdate() Dim hDate As String Dim sFile As String
[Code]....
It gets as far as "If Len(Dir(hDate, vbDirectory)) = 0" and then hangs with Error 52. Testing for Dir() sooner doesn't work either.
how to either test for read-write permissions or trap Error 52. "On Error GoTo ErrorHandler" never fires to even test for 52, unless I'm missing something.
And yes I now that's the title of a Knowledge base article, I stole it because it put into words what I can only say in expletives right now.
Basically, well it's all a bit odd. I got users on the network who, until yesterday, could access some networked databases. Other files from the same source are ok, just Access files. Today the moment they click (and I mean a single-click) on the icon to open the database...explorer hangs. You can't open the database from within MS Access either, that hangs too. But you CAN open them up and use them if you can get them copied locally. Oh yeah, some people (in the same room, on the same VLAN) can access the database, but can't perform any tasks within it. Databases are a mix of 97 and 2000. And to make matters worse, it's happening on another server.
I know you're gonna shout virus, but that looks to be a non-starter since I know of no such virus which would affect ONLY Access files and do it on a single click, and secondly The systems check out fine with both Sophos (and our good luck charm AVG) run against them.
Holy Moley! Has anyone ever come accross such a palarva?
Strange problem, i'm using XP Pro and Access from Office 2003 (both real full versions from work) - and in general use, when the mouse hovers over the 'print' icon (at the top left, undernear file, edit, view, insert, near 'save', 'new', etc), then access will hang for about 20 seconds then snap back into action.
Now, i don't even want to print anything! But every now and again i accidentally hover over it and it's bugging the hell out of me. Everything is updated (but i will check again now).
Anyone know how to make this stop? I tried a quick search but didn't get far.
Does anyone know why with some combo boxes, when I grab the scroll bar and haul it to the bottom of the records, after I let go of the mouse button, the scroll jumps back up to around the middle of the combo box? Then, I have to keep pulling it to the bottom several times before it finally gets to the last record. Thanks
This is not an other post about disabling the mouse wheel in access application but an other issue that is starting to really bug me... Some of my forms have a continuous subform, I can normally use the scroll wheel to go up and down the different record in the subform BUT i have noticed that if there is just a small amount of record in the subform (let's say three for example) when I scroll down the different records, they disapear in the detail header frame of the subform and only the last record is visible which I guess I don't mind to much. What annoys me is that if I scroll back up nothing happens the 2 records stay hidden behind the frame and the only way to put it back to normal is to use the scrolling bar on the right of the subform!??? I was wondering if anybody had a similar problem and if there is any solution to it?
In Access (2003) I was able to (by default?) scroll through records with the mouse scroll wheel. That no longer works. How can I have the form scroll backwords and forwards with the mouse wheel?
I've been reading threads and it sounds like MS "fixed" a feature that I was relying on heavily to move through records. I can't find a way to enable it again......
how can i stop wheel mouse scrolling on certain forms? it is ok on some forms but others where specific data is viewed can be scrolled to a blank space.
I'm using access 2000, and have built a long form. My users would like to be able to use their mouse wheel to scroll down the length of the form rather than having to click the scrollbar. is there a way to do this? (I'm sorry if I missed this being answered in another thread, I looked but did not find.)
This is kind of ridiculous, but I'd like to get to the bottom of it.
I have a form with a tab control on it, which holds all my controls on several pages. The tab control takes up almost the entire form; there's only a small area of the underlying form visible around it. For some strange reason, every time I open the form or switch from design mode to form mode, the form scrolls down a bit, on its own, so that my tabs are hidden and I have to manually scroll back up to see them. Apart from being very annoying, this may also hide the fact from some unsuspecting future user, that there are any tabs at all.
Can somebody explain this, and, hopefully, suggest a solution?
Hey, just a quick question that I hope someone out there maybe able to help with :-) In form view I don't want the mousewheel to scroll through my records when I use it, Can someone tell me what is the easiest way of turning this option off? I tried editing the [event procedure] in the form properties but it bought up a page in VB which I have no idea how to use. Sorry if that is confusing, basically i only want mousewheel to scroll down the form page that I'm on and NOT iterate through all my records. Any help would be much apprecitated :-) Thanks
This doesn't appear to be covered off in any "Scroll" type threads.
I have a continous form with several 100 records.
What I want to happen is when a record is selected it will automatically scroll to the top of the display (this is because my user is computer illiterate and gets confused where they were up to easily).
I can achieve this in Visual Basic but its not pretty.
If the user is scrolling down I can do this in the "On Current" Event by remembering where the previous "Current Record" was and using Command "GotoRecord" to go to the Last Record (so the screen instantly scrolls all the way to the bottom) and the using Command "GotoRecord" Last Record Number + 1 (so the screen scrolls back bringing the desired record to the top).
This works but looks messy as screen flashes a lot.
Similarly if the user is scrolling up (just use go to First Record first instead).
The best way would be if there was a Visual Basic equivalent to what you get when you Right Click on the Vertical Scroll bar where the option "Scroll Down" or "Scroll Up" is available. It would be simple if I could call that!
Any suggestions (apart from getting another user?). Any ideas would be appreciated.
I'm trying to prevent use of the scroll wheel in my subforms but allow for it in the main form. I've looked at the "mousetrap" posted by gHudson. I'm not trying to prevent changes as I am trying to prevent a blank or new record from displaying if one already exists. Any Ideas on how to do this?
it is the correct width so it doesn't need a horizontal scroll bar. However the length of the vertical can be unlimited so it therefore needs a vertical scroll bar. However when i try to scroll in the sub-form the records disappear. if i change the setting to neither scroll bars then i do not get the problem. the next time i open the form the records have re-appeared. what is the reason for this and how can i stop it?
Hi, been lurking on here for a while and can find most things im looking for but for some reason cant find any info on auto scrolling of data?
Im chasing something that will scroll a sub form which is displaying data from a query. slowly scrolling down all the data. It wont have anything entered or edited simply displaying the data. It is to be displayed on a monitor/tv and preferably have either a pause button or stop when focus command or something should they want it to pause. I was thinking it might be something like a move next loop or similar but Im terrible at code, can read alot but cant write it if that makes sence.
i will have a refresh/requery command when it gets to the end i think and or on a 1min cycle? to make sure it displays the most appropriate data.
Anyone point me in the right direction?
(sorry its long, just trying to be a good newbie poster :D )
I have a form with a group of controls on the left side and a control on the right side.
Is it possible to somehow lock down the controls on the left side so when scrolling through the form, only the control on the right side scrolls and the left side stays in position so it is always visible?