Search results for query: *

I have the following VBA code: Dim dkg As Variant, str As String dkg = Application.FileDialog(msoFileDialogFilePicker).Show str = Application.FileDialog(msoFileDialogFilePicker).SelectedItems(1) DoCmd.TransferText acImportDelim, "OnyxSRImportSpecification"...

Thank you, PHV, for identifying this item. I changed this to reflect the parameter in the stored procedure (@CashChargeRate was the parameter in the stored procedure) so everything matches). Here is the complete new code: Public Sub DailyCash_Click() Dim cmd1 As New ADODB.Command Dim...

I thought I found the problem but just got a new error message. Here is how I changed the code: Screen.MousePointer = 11 With cmd1 .ActiveConnection = cnnP .CommandText = "CreateCash_Sect_Conf_A" .CommandType = adCmdStoredProc errtype = "sql"...

The precision is invalid.

I have the following code in a Public Sub: Public Sub DailyCash_Click() Dim cmd1 As New ADODB.Command Dim errtype As String On Error GoTo ErrorHandler errtype = "vb" If (cnnP.State = adStateOpen) Then Else ConSrvr End If Screen.MousePointer...

...this database. Anyway, I have a number of Footers that I tried to put the following calculation in a text box in: =Sum(IIf([net_repo]<0,[net_repo]*-1*0.25,[net_repo]*0.25)) When I run the report I get a run time parameter value box asking for a net_repo entry. I have tried setting up a...

...have a Label9 Header and a Label9 Footer with detail between them. I have inserted the following text box formula in the detail: =IIf([Qty]<0,[Qty]*-1*0.25,[Qty]*0.25) This text box is named DetailCharge. In the Label9 Footer I have made a SumCharge Text Box that has this formula...

I have the following line in vba in access 2007: DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "Floor_Execution_Import", str, True, "B4:H30" The format of the data in the .xslx is as follows: ELECTRONIC Date ELECTRONIC Ticket # Account # B/S Quantity Month Product...

By the way, I ran the following: Select max (len(moreinfo)) from dbo.TT_Import the result from the above statement was 20. Dave

I have never, ever ran into this before. I am inserting data from one table to another and the insert is only one field to another field. Both fields are varchar(50). The field being transferred from populated just fine using an Access 2007 text import function with no errors. When I try to do...

Are there more than one text box in the detail section of the subreport? If so, I'm not sure how you can reference any other than maybe the last one. You can't "query" these. There is not more than one text box in the detail section of the subreport. Box and SumOfYTDConverted are completed by...

I have a subreport detail area that has the following detail: Box SumOfYTDConverted 5700 1200.00 5720 1699.00 5740 2000.00 The subreport is named Sec_Combined_Test. In my main report I have a the subreport named...

I have a combobox in an Access 2007 form that has two columns. I am trying to get the second column to bind and update to a table when selected by the user but each time I select that row the first column is put into the cell. The Bound Column property is set to 2. Is there something I am doing...

I am not making it to the stored procedure. Here is the entire Access 2007 sub: Private Sub cmdProcessCEMS_Click() DoCmd.Hourglass True Dim smonth As String smonth = txtDate smonth = Left(smonth, 2) If chkBksNotClosed.Value = True Then smonth = "12"...

I already looked at this site and came away more confused than I already was before. Under the SQL Server 2008 area I actually don't see anything different than what I am doing in the function set_connection(). Am I looking at something wrong? Dave

Ignore this message. I forgot to complete the subject line.

...When I click debug it goes to the following vba code: strCnxn = set_connection() Set cnxn = New ADODB.Connection cnxn.Open strCnxn ***THIS IS THE CODE IT GOES TO**** The set_connection() is as follows in a module: Public Function set_connection() set_connection =...

...When I click debug it goes to the following vba code: strCnxn = set_connection() Set cnxn = New ADODB.Connection cnxn.Open strCnxn ***THIS IS THE CODE IT GOES TO**** The set_connection() is as follows in a module: Public Function set_connection() set_connection =...

I have a text box (shows result of a query) which factors into a sum later on in a report. This text box sometimes has a null value in it which in turn throws an error in the sum field. I need to set this text box to zero if the result is null. I have tried the following: 1...

I have found the answer to this question. Please do not respond. Thanks. Dave