Search results

Try change continuous form property : RecordsetType

Dim sLookUpField As String, vVal Select Case Me.cboChooseProduct.Column(40) Case 1: sLookUpField = "[ZoneA]" Case 2: sLookUpField = "[ZoneB]" Case 3: sLookUpField = "[ZoneC]" 'Case ... : sLookUpField = "[Zone ...]" Case Else: Exit Sub End...

Public Function FormIsLoaded(sFormName$) As Boolean ' Determines if the form specified in argument <sFormName> is loaded (in any view except Design) ' -------------------------------------------------------------------------------------------------/ On Error GoTo FormIsLoaded_Err If...

Try: Function ExtractZipAndSaveAsTxt(zipFilePath As String, destinationFolder As String) Dim shellApp As Object Dim zipFolder As Object Dim fileItem As Object Dim extractedFilePath As String ' Create Shell object Set shellApp = CreateObject("Shell.Application") ' Open the ZIP file Set...

Try: Public Sub change_col_nameOld(TableName As String, OldColName As String, NewColName As String) Dim tblDef As DAO.TableDef Dim dbs As DAO.Database Dim iVal As Integer Set dbs = CurrentDb Set tblDef = dbs.TableDefs(TableName) For iVal = 0 To tblDef.Fields.Count - 1...

Take a look to strings bellow please

Look for Concatenation ...

Take a look at the example please ... Query “Query1” for understanding only - can be deleted

It seems we all choose good equipment for long years.

My BIOS is 10 yars old ( ASUS H97-PLUS)

Private Function GetListValues() As Variant Dim sVal$, idx% For idx = 0 To Me.lstDefects.ListCount - 1 If Me.lstDefects.Selected(idx) = True Then sVal = sVal & csDelimeter & Me.lstDefects.ItemData(idx) End If Next idx If Len(sVal) > Len(csDelimeter)...

Try use quotation marks around text values [MaxHorseRatingTable]![centre]="DEL"

Public Function GetLatestDate(Optional sWhereCondition As String = "") 'Usage: ' ?GetLatestDate("RecID = 23") '--------------------------------------------------------------------------------------------------- ' Name of table with fields "Phone", "Email" & "Text" ("Text" is reserved word !!!)...

When importing, the Microsoft driver despite the fact that the field is long text evaluates the imported data on the first 8 lines. If the data in them is less than 255 characters, it considers them as short text and everything further is cut off accordingly. The same applies to any other data...

Yes, you are absolutely right! (y)

Harsh practice:

Below is an example:

Publish your table (part of the data) here - we'll see. There may be something wrong with your data.

Try changing semicolons to commas ...