Search results for query: *

Just wanted to say thanks to vladk for posting the solution to his own question re: thread222-1059341. Had the same issue today and my client wanted a new executable yesterday. Your solution, I'm sure, saved me hours of grief.

This may be helpful

It appears that the 1st part of the original code does what your asking. This is from your original code... 'Set the path to the log files. Edit this line as appropriate sLogPath="Mbhqsql02\dataimport\TSWNextIntegrate\" Set pFSO = CreateObject("Scripting.FileSystemObject") Set pFolder =...

What does your SQL statement look like now? mySQL = "Select Number,Description,Balance08 from CustomerMaster where Category = " & Val(txtSch.Text) AND ?????

I'm still using Crystal 9.0 but this is how I change the database.... Dim crxReport as CRAXDRT.Report Dim crxProperty as CRAXDRT.ConnectionProperty Dim crxDBTable as CRAXDRT.DatabaseTable Set crxReport = crxApp.OpenReport("Test.rpt") Set crxDBTable = crxReport.Database.Tables(1) Set...

You can set the text property of a dropdown list as long as the value matches one of the items in the list... Private Sub Form_Load() With Combo1 'Style = 2 Dropdown list .AddItem "One" .AddItem "Two" .AddItem "Three" End With End Sub Private Sub...

Maybe incorrect spelling? 'Excel 8.0;Database=E:\open.xls;HDR=NO;'

HLPCH, I think you were quite close with your original syntax... select iif(isnull(regions),'A','B') AS RegionCode from customers

I might use a little function to drop the alpha characters... txtS1 = "AA12345" txtS2 = "S12345" Serial1 = DropAlpha(txtS1.Text) Serial2 = DropAlpha(txtS2.Text) Private Function DropAlpha(sText As String) As String Dim lLen As Long Dim sTemp As String Dim c As Long lLen...

I think there is only 1 event for the MSComm control which fires when the state of the control has changed. You then have to check the CommEvent property to see whats up. Instead of relying on the OnComm event, you might be able to check the CommEvent property in a loop, taking different actions...

Me![CoverImageFrame].Properties("Picture") = LoadPicture(Me![ImagePath])

You need to wait for each send to complete before opening a new connection. 'Form Level variable Private bSending as Boolean For x = 1 to list1.listcount Winsock1.connect IPAddress(x), 1008 bSending = True Winsock1.SendData txtSend Do While bSending DoEvents Loop next x...

In selection formula... Datediff ("d", {EmployeePos_Stat_Curr.LastHireDate}, CurrentDate) >= 365

Is Me![ImagePath] just a path and name of a picture file? Just like your default 'no picture' file?

This is how I might do it... With Form.MSFlexGrid1 'Initialize the grid .Rows = 1 .ColWidth(0) = 100 .ColAlignment(2) = 1 'This conflicts with the one below .TextMatrix(0, 1) = "Field1" .TextMatrix(0, 2) = "Field2" .TextMatrix(0...

Maybe... Rows = externdb.Execute (sql)

Hi Hypetia, I've only tested this function where the minimum value is always 0 which is ok for my purposes.

Thank you all for your replies. I can't believe it's been almost 2 weeks since I looked at this problem. I thought at first that Hypetia's solution was the one but it did not quite work properly. Anyhow, to get the result that I described above, I did this. Not very eloquent, but it works...

The container control placed on a MDI form does not get re-sized until the resize event of the mdi form finishes. So if you minimize your mdi form, your container control will have a width of 0 when you normalize the window. If you are doing any repositioning based on the width of the container...

So you have an mdiForm with a container control like a PictureBox (toolbar?) that has the Align property set to 1 (Align Top) and another picture box (logo?) within the container control that should always be to the right? If so, put your logo repositioning code in the resize event of the...