Search results

i believe strOutFile is the externa db name, 'make sure to add backspace to OutPath strOutPath = Replace$(strOutPath & "\", "\\", "\") strSQL = "Insert Into [" & strOutTableName & "] In '" & strOutPath & strOutFile & "' " & _ "Select X.* from [" & strSource & "] As X;"

it's not a problem alright. it tells that the return of the function is a string. that is the old vb declaration and still works.

it will not affect previous saved records. btw, just tested on ms access BE, and did work.

the startup form has an arabic control name (the detail section of the form). so you need to rename it to english. you create new db and copy all objects from the original db.

use: =Now() as the Default value and don't use any Format on it. on design view of Form, Forms!Form0_AddEditJob, click on TBOX_DateInitial textbox and on Property->Format, use: dd-mm-yyyy ms access save date in US date format. the Format property of TBox_DAteInitial is for viewing purpose...

if somehow the reference to the Object is lost, can you "force" re-create the object again: Public Function RegKeyRead$(ByVal RegKey$) ' Reads registry key RegKey, if key doesn't exist, return value is "" On Error Resume Next ' re-create the gbl_SH again before ' calling any of its Method ' '...

yes, i saw the film today, oh boy... but the position is already defined in the table, so it is not dynamic. try, resizing the chart, if your line will also follow when the form/chart resize?

here test your form. see the code on the "barcode" (main form) Before and After Update event.

you tried to resize the form, but the chart did not resize with the form and so does the marker:LOL: also the position of the marker is predefined and not dynamic.

when runtime error occors, variables are destroyed.

you have another alternative (Tested also). using GhostScript (can be downloaded here: https://github.com/ArtifexSoftware/ghostpdl-downloads/releases) use the "older" version (pic1) and download whichever windows bitness you have. when installed there will be two .exe on the installed folder...

what you can do as band aid so the color stays when you click or enter the control, is to call again the Detail Paint event on: 1. control's Click Event 22. control's GotFocus Event Ms.Gina Whipp has another interesting demo of using Ascii characters (instead of Long Richtext with color...

you can "force" Listbox3 to filter (based on Listbox2), by adding additional code ot Listbox1 AfterUpdate event. Private Sub Listbox1_BeforeUpdate(Cancel As Integer) Listbox2.Requery If Listbox2.ListCount <> 0 Then Listbox2 = Listbox2.ItemData(0) End If Listbox3.Requery End Sub

it is easy if you have Debenu (Foxit SDK), just small number of lines: Private Sub test() Dim lic As String: lic = "xxxxxxxxxxxxxxxxxxxxxxxxx" Dim iNumPages As Integer Dim sPdf As String, sOut As String Dim qp As DebenuPDFLibrary64AX1811.PDFLibrary Set qp = New...

no problem, what makes you say that?

same page Agnes get it's answer.

you have exactly the same answer as Agnes AI.

https://myengineeringworld.net/2013/03/vba-macro-to-convert-pdf-files-into.html

from the attached pdf: "The simple formula for the calculation is ([UnitsInStock]+20)/20 which produces a floating-point number which is converted to an Integer in the Result Type property. In a ‘real’ application you would probably need a more complex query (or even some VBA code) to create...

are you sure you don't have Null values on some of your Fields used by the function?