Recent content by coolscan3

Problem solved

DoCmd.TransferText acExportDelim, "TOutputSpec", "tOutput", "c:\data\Agresso.txt", False Is there a limit to the length of a string that can be exported to a Fixed length csv file I have set the size to 500 in the specification file but only get a max length of 255

Thanks for the Reply I tried start msaccess drawingsSA.mdb /excl previously but access could not find DrawingsSA.mdb After further investigation start msaccess %cd%\drawingsSA.mdb /excl worked ok

It is to form Part of a batch file which will require a relative path (To run from a DVD) hence the need to Open Exclusive to avoid writing the .ldb file

I am using : "C:\Program Files\Microsoft Office\OFFICE11\MSACCESS.EXE" "C:\Test\DrawingsSA.mdb" /excl to open a Database Exclusive, works fine Is it possible to open it exclusive without using the "C:\Program Files\Microsoft Office\OFFICE11\MSACCESS.EXE" part

Can a Textbox be rotated 45 degrees

Thanks, the reports() was what I was missing

Is it possible to refer to a reports recordsource using a variable eg. DoCmd.OpenReport Variable1 & "Report2", acViewDesign, , , acHidden Reports!Variable1.RecordSource = sqlstr DoCmd.Close acReport, Variable1 & "Report2", acSaveYes

Thanks for you help, yes this does work fine

Cannot see a problem with this Code Dim db As Database Dim tdf As TableDef Dim fld As Field Dim n As Integer Set db = CurrentDb DoCmd.SetWarnings False DoCmd.OpenQuery ("qBelowStandard") **** Make Table Query Set tdf = db.TableDefs("tBelowStandard") MsgBox (tdf.Fields.Count) *******...

Thankyou Remou, That was the problem

I have the following Code: On Error GoTo Err_Handler Dim db As Database Dim rst As Recordset Set db = CurrentDb Set rst = db.OpenRecordset("select * from tSample where sftshift='K'") MsgBox (rst!wodref) Exit sub Err_Handler: MsgBox ("Error") A "no current Record" error is deliberatltely...

This is the Complete Code constr = "ODBC;DSN=PlanetEnterprise;Description=PlanetEnterprise;DATABASE=PlanetEnterprise;Trusted_Connection=Yes" sqlstr = "select fds.nonPMJobs.npmJobRef,fds.workorders.wodref " _ & " from nonPMJobs " _ & " INNER JOIN fds.Workorders ON fds.NonPmJobs.npmJobRef =...

I have a Pass through query and am getting a syntax error in join operation. sqlstr = "select fds.nonPMJobs.npmJobRef,fds.workorders.wodref " _ & " from fds.nonPMJobs " _ & " INNER JOIN fds.Workorders ON fds.NonPmJobs.npmJobRef = fds.Workorders.npmJobRef" _ & " where...

Code for changing colours in a Pie Chart Please