Search results for query: *

Turned out an object needed to be instantiated. Works fine after that.

...String Dim bolDBOpen As Boolean = Opendbconnection("dialysistest", "dialysistest", "dialysistest") Results = ExecuteQuery("SELECT * FROM dba.patient_master") Dim bolDBclosed As Boolean = CloseDBConnection End Sub Private Sub Form1_Load(ByVal sender As...

Thank you all! Antzelinaki, I found it before your last post, but you pointed me in the right direction. I was calling the problem sub from code that would exit the form, so that when the problem sub completed, the form closed. As always, it is something small that causes the biggest problems...

Form show command is first block of code in my post above. Code used to actually close the form: Private Sub sbExitRoutine() 'sbClearForm sets lbls, txtbox, & combos = "" sbClearForm() Me.Close() End Sub Thanks for looking at this, I'm stumped.

I have since worked around above problem but have encountered it again in different circumstances which leads me to believe the problem is not with the Leave event but with the way am calling and or trying to close a form. In this case the form is opened by clicking a menu item on the main form...

...cboZip.Focus() Exit Sub End If End If strSQL.Clear() strSQL.Append("SELECT * FROM dba.zip_master WHERE zipid = '") strSQL.Append(strTemp) strSQL.Append("'") rsZip.Open(strSQL.ToString...

I've gotten a lot of use out of http://visualbasic.about.com/

I am programming in Visual Basic 2010 and a Sybase database, using ADO. I have received errors from the database "max prepared statements count exceeded". I discovered how to raise the max count allowed, but my concern is that I am possibly leaving something "out there" that I should be closing...

I showed this to my systems guy and he said it makes sense, but right now it isn't worth it to try to get our mail server administrators to make any changes. Since the workaround is working, we'll just leave it as is. Thanks to Borvik and Qik3Coder!

Had blinders on . . . just tried another outside email address (not a cell phone text) and it failed with the same error as the text messages.

Trying to send FROM a regular email TO the sprint and verizion addresses. Made a workaround by sending message to address that uses Outlook and setting up auto forward. Works, but I'd prefer do to it right.

My Visual Basic 2010 application needs to send a text message to three phones under certain conditions. Written and tested on a Win7 machine it works fine. After installing on the production machine, a Win Server 2003, the following error occurs: "5 Mailbox unavailable. The server response was...

I am working in VB2010 and have spent the morning searching for this and have had no luck. I need to loop through HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services and check the names of the subkeys for a particular pattern, then when the subkey(s) I'm looking for are located, read some of the...

I also want to be able to set some properties of the comboboxex and don't see how to do that either.

Not as good as VB6, but it worked. Thanks!

Is there a way to clear all bookmarks?

...AddControlSet() Dim c As Control c = New ComboBox() c.Name = "cboInputFile" c.Top = Me.Controls.Count + 1 * 25 c.Left = 5 c.Width = 125 Me.Controls.Add(c) c.Text = "SELECT file" c = New ComboBox() c.Name...

Fixed it, tho I don't know why it worked then didn't. Perhaps fix is a workaround, but it is a difference that makes no difference where the user is concerned. Originally the form containing the code calling the ReportView form stayed loaded while the ReportView code executed. I modified the...

...GoTo TreeView1_DblClick_Error If TreeView1.SelectedItem <> "Ranac Report List" Then Set rsReportInfo = New ADODB.Recordset strSQL = "SELECT * FROM reports WHERE report_name = '" & TreeView1.SelectedItem & "'" rsReportInfo.Open strSQL, dbRep If rsReportInfo!is_parent_yn = "N" Then...

...<code> 80 CRViewer9.EnableGroupTree = False 'here 90 Print #1, "Step 1" 100 CRViewer9.Height = frmReportView.Height * 0.75 110 Print #1, "Step 2" 120 CRViewer9.Width = frmReportView.Width * 0.98 130 Print #1, "Step 3" 140...