Recent content by ryanku

If the field FUNDCODE has Text data type, you have to change that expression, from: DLookUp("descrip","cash descriptions","FUNDCODE=" & [cashnycashitemsdetail]![FundCode]) become: DLookUp("descrip","cash descriptions","FUNDCODE='" &...

I use Access97. The first function (without API) that I tested works just fine. I really don't know if it'll work with 16-bit application. This function needs "Microsoft Scripting Runtime" reference (vba332.dll, usually in folder C:\Program Files\Common Files\Microsoft Shared\VBA)...

1. Create a command button, name that button 'cmdCurrentFormPreview' 2. Set 'Display When' property to 'Screen Only' 3. Inside cmdCurrentFormPreview's 'On Click' event, put this line: DoCmd.OpenForm Me.Form.Name, acPreview 4. To print preview this current form, just click this...

This is Remedy's answered remedy (Programmer) Jul 27, 2001 It's easy using FileSystemObject: Private Function GetSerialNum(ByVal DriveName As String) As Long Dim loFSO As FileSystemObject Dim loDrive As Drive Set loFSO = New FileSystemObject Set loDrive =...

If I'm not too late Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) Const vbLightGrey = 12632256 If Me.CurrentRecord Mod 2 = 0 Then Me.Section(acDetail).BackColor = vbLightGrey Else Me.Section(acDetail).BackColor = vbWhite End If End Sub

The error number (Err.Num) for that error is 2501. So for the simple way to avoid that message being show, just add 'If Err.Num <> 2501 then' before 'MsgBox Err.Description'. If you want to know the error message, just put the Err.Num in the Msgbox: Err_Test_Print: If Err.Num <> 2501 then...

Really?? As fas as I know, Microsoft Access will never ever able to do that (.exe file).

I'm not renumbering the records, the 'counter' field contain fixed data that I'm not allowed to add/deleted/edit. The only field that I'm allowed to edit is 'item' field. It doesn't has to sorts 'Asc' or 'Desc'. The result must be in the same table. Thanks for the responses

Hi, Does anyone how to code my 'little' problem: my table, before: Counter Item 1 <null> or &quot;&quot; 2 XYZ 3 <null> or &quot;&quot; 4 ABC 5 JKL ... need to became: Counter Item 1 XYZ 2 ABC 3 JKL 4...

striker, i like to see you combo box if your don't mind. Maybe we can fix it. ryanku@hotmail.com

Maybe this link can solve the problem http://www.microsoft.com/AccessDev/Articles/GetzCh10.HTM#List

It can be done if we use MDB file, not MDE. Please visit this site: http://www.microsoft.com/AccessDev/Articles/GetzCh10.HTM#Setup

Try to change this line: stAppName = &quot;C:\Program Files\Windows Media Player\wmplayer.exe /play &quot; & Me![Filename] become: stAppName = &quot;C:\Program Files\Windows Media Player\wmplayer.exe /play &quot; & &quot;&quot;&quot;&quot; & Me![Filename] & &quot;&quot;&quot;&quot;

It can be done if we use MDB file, not MDE. Please visit this site: http://www.microsoft.com/AccessDev/Articles/GetzCh10.HTM#Setup

Perhaps for some reason you need to check if the Credit Card number is in a valid format or not? http://www.allapi.net/tips/tip47.php ryan, ryanku@hotmail.com