Threads Replies Last Post 17 Pages: 1  2  3  4  5  6  7  8  9  10  11  12  13  14  15  16  17   Says all records are null I have the following code loaded on a simple for with a command button to execute it. When I run this code it tells me every time that the [duedate] field is always null. I open up the query and can clearly see that there are dates in this field for most records but it never recognized them. I'm sure I''ve got some thing wrong in here that is causing it. Thanks in Advance... ... 4 11.07.2006 13:15:45 PLEASE. What is the best way to create a history Hi, First let me thank anyone who tries to help me out here. I have a medium size relational database (4 relational tables) on a network with about 15 users who enter and modify data. I would like to create a history table or multiple tables if need be, that tracks what was changed, by who and when. I have security in effect, so each user has there own userID and password and, I am ab... 2 11.07.2006 03:53:14 Help with Combo box list to retrieve queries or forms Hello, Could someone tell me how I can list the queries of an access database in a combo box in my access form? Jeff... 2 07.07.2006 01:31:15 Dlookup problem Hi, I am retrieving the current financial year from a query which has two fields from a table - FinancialYearStart and FinancialYearEnd. The query has calculated field creating a short version of the current financial year (YearFromTo) e.g. 05/06. I have the following dlookup statement to get the current financial year from a given date: DLookup("YearFromTo", "qryFinancialYears",... 7 03.07.2006 02:50:58 Creating a linked table I have two MDB's I want to programmatically create links in one to the tables in the other. I am struggling to get the code to work at all ... I have tried every combination of connect string that I can think of. I don't want to use ODBC ... This is how it looks now ... what am I doing wrong? Many thanks all, jON Sub LinkTables() Dim sConnect As String Dim td A... 4 01.07.2006 07:24:08 Invalid use of null This is a multi-part message in MIME format. ------=_NextPart_000_0006_01C6945A.CF072FC0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable Hello All I have the following criteria expression which works fine when there is = a value in the field [last email sent], but when this field is empty I = get the "Invalid use of null" error. If DCoun... 4 30.06.2006 08:11:13 VBA syntax question hello what is the syntax for asc function in VBA if the argument is " ? asc (""") returns, as expected an error message! thank you! ... 5 28.06.2006 20:56:23 verify directory exist? I was wondering if there was an easy way to verify if a file directory exist? Example verify is "c:\folder1" exist? I want to create a directory structure in my code for projects that users create to store very large image files and I need to verify that it doesn't exist before I start. Also is there a way to return the number of files that exist in a directory? Thanks BW ... 4 25.06.2006 01:37:52 SendObject Issue when i use SendObject to send mail outlook open's as Modal form and outlook application can't be minimized so if user cann't do any action in access until sending the mail is there a way to resolve it? thanks ... 2 23.06.2006 09:21:37 Mergecells-Manipulating an Excel Workbook within Access Code When creating a brand-new workbook from within an Access module, I was wondering if Excel's mergecells can be activated. I'm using Microsoft Access 2000, and the actual word, "mergecells", is recognized, however the Excel cells don't merge (unless there is syntax that I haven't found yet.) Since it is a new Workbook, having an Excel macro that merges cells and then calling it might ... 2 22.06.2006 17:00:51 Null error I am trying to import data from a text type file into a table. Problem is, the data involves names, some with middle initials, some without. I need the data to be without initials....so, I have the following line to add the data: tblEBIZHours![TECHNAME] = Left(tblEBIZTemp![Emp Nm], InStr(1, tblEBIZTemp![Emp Nm], ",") - 1) & ", " & Trim(Mid(tblEBIZTemp![Emp Nm], InStr(1, tblEBIZTem... 5 22.06.2006 16:49:02 maildb20 converted to english This is a multi-part message in MIME format. ------=_NextPart_000_0006_01C65C80.26A75E70 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable There's a great example I found, = http://www.freeaccess.de/downloaddetails.asp?ID=3D19, for how send = emails from Access without using the sendobject command. The issue for me is a lot of it is written i... 2 22.06.2006 14:35:03 Finding drive letter for CD-RW Hi all. I need to find out the drive letter for a CD-Rom ( better the CD-RW of a single computer) in order to save some data to it. There should be some way to get it from registry but I do not know how at all. I would be very grateful for your help !! Thx Gina ... 4 21.06.2006 10:51:55 How Do I Expose a Module? How do I expose a module to more than one Access application/mdb? ... 3 20.06.2006 15:31:59 Date format in INSERT command Hello All I have a module that includes the following code: DoCmd.RunSQL "INSERT into tblEMailLogs (txtEmailFrom,txtEmailTo,dteSend,txtAttachments,intPrint) Values (" & "'" & from & "'" & "," & "'" & recip & "'" & "," & "#" & Now() & "#" & "," & "'" & attachments & "','1'" & ")" This works almost perfectly: but for some reason the field 'dteSend' is being inserted in US format (i.... 3 20.06.2006 10:24:21 Custom function for a query Hey! I'm not getting this to work. What I'm trying to do is create a custom function that I can call from an update query to change the value in a field. I need to round values to the nearest $50 dollars. i.e. if [budgincrs] = 35586 the new [budgincrs] = 35600 or another example if [budgincrs] = 35525 the new [budgincrs] = 35550 or another example if [budgincrs] = 35506 the new [... 8 19.06.2006 16:07:02 mail merge fails between access 2k and word 2k3 Here is the code i'm using for mail merge: ------------------------------ Dim myWord As Object Dim file As String Dim sql As String On Error GoTo errHandler DoCmd.Echo True, "GENERATING YOUR LETTER....Please Wait......Thank You...." Set myWord = CreateObject("Word.Application") 'myword.Visible = True Select Case (mLetterTitle) Case "Initial Notification Letter": ... 2 19.06.2006 11:46:51 Question on Process Blocking I have a module that launches Word to do a mail merge, using an access table. After it launches Word, the code issues a message asking the user if they want to do something, however I don’t want the message to pop up until the user has closed the Word application. Is there a way to block execution in Access until some other asynchronously running application finishes? Thanks.... 25 18.06.2006 11:42:51 Finding date of Monday in the week from a date Is this a good way of doing it? Any caveats I should be aware of? DateAdd("d", -(DatePart("w", strDate, vbMonday) - 1), strDate) Thanks, Mattias... 3 16.06.2006 20:15:28 Create list of dependencies and dependants I have with some luck tried to program some VBA that writes a text file with all dependencies and dependants for all tables and queries (should be extended with forms and reports). I am able to find the top level dependencies/dependants only as well as all levels (by looping). For each dependency/dependant I have with no success tried to list whether it is a relation, or used in a query,... 4 16.06.2006 09:59:00 Dilalog Box Not sure if this is the correct place to post this or not becase it envolves several different Microsoft Products, if hopefully someone can point me in the correct direction. I have a windows 2003 server with office 2003 and Citrix Metaframe Presentation server installed on it (for users outside of the network). I have an Microsoft Access database that I developed, that through a module... 2 15.06.2006 19:28:58 OpenReport problem DoCmd.OpenReport "MyReport", acViewPreview end's with error 2213 "printer is not available ..." why? there is no printer involved with Preview thanks ... 3 15.06.2006 08:08:14 MailMerge Event Doesn't Fire in Access I have a mail merge routine in an Access module (see below). It runs the mail merge, but never fires the MailMergeAfterMerge Event in Word. I can un-commnet the "wrdApp.Visible = True" statement and the merged document is displayed, but the event never fires. I do have a "Dim WithEvents wrdApp As Word.Application" in a form that calls MARSMailMerge, which has worked in a simpler test cas... 5 14.06.2006 16:01:32 Check if folder does exist Sorry I did post this earlier in the wrong news group. Hi all, Can someone give me a solution on how I will be able to check if a folder exist (empty as well). I have always used below method to check if files exist. =====================================START Function CheckFileExist(fName as String, fPath as String) On Error GoTo Err_CheckFileExist If Len(Dir$(fPath & "\" & ... 3 14.06.2006 03:19:17 DSum not working, please help! I am trying to get the total hours taken if your time ahs been excused and all I get is Type Mismatch 13 error. It works if I remove 'And "[aExcused]=" - 1' but I need that to show me total excused hours. What am I doing wrong. Thanks in advance, Gina DaysOff = DSum("SumOfaTimeDecimal", "qryDaysOff", "aAssociateID = '" & AssociateID & "'" And "[aExcused]=" - 1) -- Gina Whip... 10 13.06.2006 19:45:51 17 Pages: 1  2  3  4  5  6  7  8  9  10  11  12  13  14  15  16  17