|
i_kant_spel wrote: Me.MainTableAdapter.Transaction = Me.MainTableAdapter.Connection.BeginTransaction()
I can't find any termination of that transaction inside SearchButton_Click; try adding a Commit.
BTW: I'm a bit puzzled by the double Connection.Open/Close; and by your transactions, do you need them at all?
Luc Pattyn [Forum Guidelines] [Why QA sucks] [My Articles] Nil Volentibus Arduum
Please use <PRE> tags for code snippets, they preserve indentation, improve readability, and make me actually look at the code. modified on Sunday, December 5, 2010 5:49 AM
|
|
|
|
|
Added
myCommand.Transaction.Commit() below the button click function's Dim dbReader As OleDbDataReader = myCommand.ExecuteReader. It didn't make a difference.
Luc Pattyn wrote:
I can't find any termination of that transaction inside SearchButton_Click; try adding a Commit.
There's a good chance I've got oledb completely wrong, but I'm trying to read from two tables, so I thought I needed two table adapters, and both of them have connection properties.
It did occur to me that both adapters could share the same connection, so I changed the first function to this:
Private Sub SearchButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SearchButton.Click
namesList.Items.Clear()
myCommand.CommandText = "Select * from main WHERE Title Like '%" & nameTB.Text & "%' order by title asc, ID asc"
Dim dbReader As OleDbDataReader = myCommand.ExecuteReader
Dim myCommand As OleDbCommand = Me.MainTableAdapter.Connection.CreateCommand()
Me.MainTableAdapter.Transaction = Me.MainTableAdapter.Connection.BeginTransaction()
myCommand.Connection = Me.MainTableAdapter.Connection
myCommand.Transaction = Me.MainTableAdapter.Transaction
myCommand.CommandText = "Select * from main WHERE Title Like '%" & nameTB.Text & "%' order by title asc, ID asc"
Dim dbReader As OleDbDataReader = myCommand.ExecuteReader
myCommand.Transaction.Commit()
'stuff
Me.MainTableAdapter.Connection.Close()
End Sub
Same issue, though.
|
|
|
|
|
I'm no database expert, however I have several remarks for you:
1. I don't know why you are using transactions; the code shown only reads some data.
2. You could google "cannot open any more tables" and see a number of hits. I suggest you read a dozen of them and see if any of them ring a bell.
3. a number of database experts recommend against DataAdapters and in favor of DataReaders; you seem to mix both.
4. I would keep the code as simple as possible; only add something when you really have to.
5. You may want to provide more context when asking a question here. For instance, what has succeeded so far, how many tables/connections/transactions went well before things go wrong.
|
|
|
|
|
1 & 3 & 4:
Ok, I rewrote a big amount of the code. There are no transactions, no adapters, no strongly-typed datasets. See the original post for the new code. It still has the same problem.
2:
Yeah, I did this before posting here. I couldn't find anything that seemed to apply to my situation.
5:
If I leave titleTB.Text blank and click the search button, it will find everything in the database. This always works the first time. If I click it a second time, sometimes it works, sometimes it doesn't. IIRC, it always fails by the fifth time.
I've added some counters to the dataReader function lines, and ran it until it crashed, and looked at the counters.
The first executeReader occurs 3 times.
The first Read occurs 1320 times.
The second executeReader occurs 1319 times.
The second Read occurs 120 times.
|
|
|
|
|
i_kant_spel wrote: The first Read occurs 1320 times.
The second executeReader occurs 1319 times.
OK, you need some Dispose() calls.
While the garbage collector will eventually collect whatever objects you no longer need, it is wise to call Dispose() on those objects that are no longer in use and are instances of a class that offers a public Dispose(). This helps the system to cope with unmanaged resources, and to behave better when using scarce resources. It would not apply to objects you did not create yourself or didn't order creation of (such as PaintEventArgs.Graphics in a Paint handler).
It does apply to OleDbCommand and OleDbDataReader.
|
|
|
|
|
OleDbDataReader doesn't have a Dispose, but it does have a Close. I tried adding that to the end of the getQualifier function. Seems to have worked.
Thanks!
|
|
|
|
|
You're welcome.
|
|
|
|
|
Hi
Iam using sql server 2008. While saving time Iam getting trouble to show the size for varchar(max) field...
From the below Item_Description is Varchar(Max)
Therefore, how to pass the parameter size?......
My commands..
=============
Dim Ins_Save As String = "insert into Stock_Master (item_code,item_name,item_description) values (@item_code,@item_name,@item_description)"
MyDataAdapter.InsertCommand = New SqlCommand(Ins_Save, con)
With MyDataAdapter.InsertCommand.Parameters
.Add("@item_code", SqlDbType.VarChar, 15, "item_code")
.Add("@item_name", SqlDbType.VarChar, 30, "item_name")
.Add("@item_description", SqlDbType.VarChar, ?????????????????????, "item_description")
End With
Thanks For The Ideas
Regards
PARAMU
|
|
|
|
|
searching for SqlParameter varchar(max) I found some pages that suggest -1 would be good; I didn't find an official statement on the matter though.
|
|
|
|
|
We have a VB6 ActiveX exe program that is compiled to exe in a source library then signed and copied to the program files folder.
The program registers when we issue c:\Program Files (x86)\folder\Program.exe /REGSERVER
It is invoked by another program (QuickBooks) from the ProgramID not guidgen.
When QuickBooks invokes the program is running from the source libary (as per app.path) where it was originally compiled and signed not program files where it is registered to.
The registry has many references to the program and to the program and source library.
Can you tell me?
1. Why so many references in the registry to the source library for the activeX.exe?
2. How to get it invoked from the program files folder not the source folder.
BTW: When this is installed and setup on another machine without the source libraries it works fine.
Thanks and happy holidays!!!
|
|
|
|
|
Hi,
Can you guys check to see what I am doing wrong:
Two tables
Table_A( ID type INT, Dept_Code type INT, Name type STRING)
Table_B( ID type INT, Dept_Code, Commune_Code type nvarchar)
A view Of tableA_B (ID, dept_code, Commune_code, dept_name, commune_name)
Query:
Select * from table_A_B
where dept_code=@search or commune_code=@search
when I enter value such as 2, 3, 5; no problem
but when I do value such as 2.5,5.1.
Error: conversion failed when converting nvarchar as value to type integer.
thanks in advance
|
|
|
|
|
Yeah, this has nothing to do with VB or VB.NET. This is all SQL stuff that should be in the Database forum.
But, the error is exactly correct. In Table A, you've got Dept_Code typed as an Integer and in Table B, you don't specify a type.
You cannot supply @search to both an Integer type and an NVarChar type the same way. You also have to recognise that your cannot convert a floating point number to an Integer without data loss, so you're really NOT searching for 2.5, you're searching for 2, IF there is a hit on the Dept_Code Integer type.
|
|
|
|
|
Hi,
thanks..
Dept_code in table_B is as type INT.
When I search for 5, it is ok, but when I do 5.1 the error occurs.
Thanks again..
|
|
|
|
|
Of course it errors! 5 can be directly converted to an Integer without any data loss. 5.1 cannot.
|
|
|
|
|
What is the point to search for a float value (5.1) in an int field ?
Assuming this int represents a region or city code, what do you expect to get when you query for 5.1 ?
|
|
|
|
|
Hi,
Iam using vb.net2008. And while I send E-Mails it's sending 3-times for 3 reciepents....means each address is receiving 3 mails...
I don't know...whats wrong with me..
Does AnyBody Faced This Problem?
Even I tried by adding CC and BCC, but everywhere its always sending the mails as per the number of addressess.
My Codings...
-----------------------------------------------------------------------
FrmMail = "one@codeproject.com"
ToAddress = "two@codeproject.com,three@codeproject.com,four@codeproject.com"
MailMsg = New System.Net.Mail.MailMessage(FrmMail, ToAddress)
MailMsg.Subject = RichTextBox3.Text
MailMsg.Body = RichTextBox1.Text
MailMsg.IsBodyHtml = False
'Its also sending as per the number of address"
'MailMsg.CC.Add(""two@codeproject.com,three@codeproject.com,four@codeproject.com")
'MailMsg.Bcc.Add(""two@codeproject.com,three@codeproject.com,four@codeproject.com")
'My SERVER
Dim smtp As System.Net.Mail.SmtpClient = New System.Net.Mail.SmtpClient("1.2.3.4", 25)
'My USER SYSTEM
Dim MailAuthentication As System.Net.NetworkCredential = New System.Net.NetworkCredential("1.3.2.1\someone", "123")
smtp.DeliveryMethod = Net.Mail.SmtpDeliveryMethod.Network
smtp.EnableSsl = False
smtp.UseDefaultCredentials = True
smtp.Credentials = MailAuthentication
Try
smtp.Send(MailMsg)
DataGridView1.Rows(TR1).Cells(3).Value = "MAIL HAS SENT"
Catch ex As Exception
MsgBox(ex.Message)
End Try
-----------------------------------------------------------------------
Thanks and Regards
PARAMU
|
|
|
|
|
why do you add addresses to both Cc and Bcc? To, Cc and Bcc are lists of recipients, they accumulate.
And please use PRE tags for showing code snippets.
|
|
|
|
|
Hi
May be I don't mentioned earlier I used as either CC or Bcc , not the both.
Thanks
|
|
|
|
|
|
Without seeing your code around the Process class you're using there's no way to tell you what you're doing wrong.
Josh6680 wrote: I've been sitting here for hours searching through millions of useless help topics!
It's quite easy actually. Process.GetProcessesByName is quite easy to use. But, like I said, it's impossible to say what you did wrong.
|
|
|
|
|
|
You've overcomplicated this. I have no idea what you were doing with the ConvertAll and the ProcessToProcess thing. GetProcessesByName returns an array of Process objects. If you expect only one instance of the process you're looking for, check the size of the returned array for 1 instance and just check the HasExisted property of the one instance. If you're expecting that you can have more than one instance, you'll have to complicate the code a bit.
Dim processes As Process() = Process.GetProcessesByName("ProcessName")
If processes.Length = 1 Then
Do While processes(0).HasExited = False
' Wait half a second and check HasExited again.
Thread.Sleep(500)
Loop
End If
' The process has exited. now you can do whatever you need.
|
|
|
|
|
|
If that one messed you up, I you should seriously pickup a book on VB.NET and work through it. You've got a ton of basic concepts that need to be laid out to you before you can really start understanding the documentation on the rest of the .NET Framework.
|
|
|
|
|
Are You tried this..,
System.Diagnostics.Process .GetProcesses
Rajesh B --> A Simple Programmer <--
|
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
