|
You can inherit the BGW and add the variable into that class. I don't have VB at the moment but the basic idea is simple. I believe that this C# snippet will give you the idea. Instead of : in class definition, you would use inherits also the definition of the variable, constructor and property are a bit different, but not much:
public class MyWorker : System.ComponentModel.BackgroundWorker {
private string _customData;
public MyWorker() : base() { }
public string CustomData {
get {
return this._customData;
}
set {
this._customData = value;
}
}
}
When using it, you would:
...
MyWorker theWorker = new MyWorker();
theWorker.CustomData = "ABCD";
theWorker.RunWorkerAsync();
...
This is one way that you define and set the class variable inside each BGW. Now in the DoWork yuo can get the value using CustomData property getter.
|
|
|
|
|
Hi, I am new to this site and so far it has been very helpful, however, I have a problem.
Here is what I have so far:
If File.Exists("C:\\File.txt") Then
Dim sReader As New StreamReader("C:\\File.txt")
Dim CurrentLine As String
Dim DataLines As New System.Collections.Specialized.StringCollection
Do While sReader.EndOfStream = False
CurrentLine = sReader.ReadLine
If CurrentLine.Contains(txtR1.Text) = False Then
DataLines.Add(CurrentLine)
End If
Loop
sReader.Close()
sReader = Nothing
Dim sWriter As New StreamWriter("C:\\File.txt")
For Each CurrentLine In DataLines
sWriter.WriteLine(CurrentLine)
Next
sWriter.Close()
sWriter = Nothing
end if
As you can see txtR1.text is what contains the string that needs to be deleted from the .txt file. It works and will delete the string from the text file (if it is there). However I want to delete from txtR2.text and txtR3.text as well. Unsure if this is possible, is there a way to combine txtR1, txtR2, txtR3?
Using Vb.net(05)
Thanks!
-Rp
|
|
|
|
|
Welcome to CodeProject 
To you question, I think there are number of ways doing this but can't you simply use multiple conditions in your if statement, like:
...
If CurrentLine.Contains(txtR1.Text) = False
Or CurrentLine.Contains(txtR2.Text) = False
Or CurrentLine.Contains(txtR3.Text) = False Then
...
|
|
|
|
|
Hi RPiskami;
Your if statement should use the And logical operator so that if any one of the three are found it will not write that line to DataLines.
If CurrentLine.Contains(txtR1.Text) = False And _<br />
CurrentLine.Contains(txtR2.Text) = False And _<br />
CurrentLine.Contains(txtR3.Text) = False Then<br />
DataLines.Add(CurrentLine)<br />
End If<br />
Fernando
|
|
|
|
|
Thanks Guys! You have been some great help! Now to learn to error check my adding button so that I don't add the same string twice.
-Rp
modified on Sunday, January 18, 2009 5:30 PM
|
|
|
|
|
Here is todays little problem
Usually I would write soemthing like this :
ErrorMessage = "First Line" & vbCrLf & "second Line"
MSGbox(ErroMessage)
- This will produce a two line message
What I need to do is to write the code like this
ErrorMessage = "First Line ??Linefeed?? second Line"
- Notice This is just one continius string not an assembled string as in the original.
MSGbox(ErroMessage) should then also display two lines
How do I do this the most straigh forward way ?
The reason I'm trying to do this is for globalization of our software
This approach would make it easy to translate any error message into another language
thanks
Georg
|
|
|
|
|
Georg Kohler wrote: ErrorMessage = "First Line ??Linefeed?? second Line"
- Notice This is just one continius string not an assembled string as in the original.
But you constuct it programmatically or is this string stored somewhere else? The problem is that I don't see the difference between those two variations is you still create the message text in the program.
|
|
|
|
|
Actually there is a difference - at least it seems to me 
ErrorMessage = "First Line" & vbCrLf & "second Line"
' This will produce a two line message
ErrorMessage = "First Line vbCrLf second Line"
' will not produce a two line message
(maybe replacing VBCrlf with something else would also work - but here is my solution so far)
LogMessage = "First Line \n second Line"
LogMessage = LogMessage.Replace("\n", Environment.NewLine)
MSGbox(Logmessage) ' will again produce a two line message
"First Line \n second Line"
is what get's stored as a resource - as you can see it will be easy to
change this into another language as you can add the line feeds wherever you need to.
In my code I also add Variables to the message - again this will allow for easy translation into another language.
A typical error message might look like this
" Error detected in line \VAR1 \n Dublicate \Var2 values detected!"
This might end up looking like this:
.....
Error detected in line 12
Dublicate N values detected!
....
|
|
|
|
|
I think that's a very good solution. I've used that system a lot. The only thing is that you may consider running the replace twice. First put the variables in place and then format the string with newlines. I sometimes have strings in variables that also contain \n. Doing this in two phases also replaces the newlines from variables correctly.
|
|
|
|
|
Hi,
if you want the multi-line string to be a single string in your database or your localized resource,
how about this:
- use a special substring to indicate NEWLINE (e.g. use \n like C/C++/Java/C# do)
- then replace it by actual newline at run-time; in VB.NET that would be
myString=myString.Replace("\n", Environment.NewLine)
I don't know how it would look in ancient VB.
- obviously reading the database/resource and replacing \n would fit nicely in a little method/function.
modified on Sunday, January 18, 2009 5:33 PM
|
|
|
|
|
Actually that's what I ended up doing last night ..
I was just "fishing" to see if there is a different way to do this
I ended up using @LF@ as the string to be replaced by the Environment.NewLine
I have to look int using \n instead - stick to the standard if possible ...
Anyway - thanks for taking the time to answer my question
As always "you guys" haven been great!
Georg
|
|
|
|
|
You're welcome.
|
|
|
|
|
Hi,
I am trying to use the Fill() method of dataAdapter class to fill a dataset but Im getting a SqlException error when I run my code. The error says Invalid object name 'Testing'. My database name is Runner.mdf and Testing is a table in my database. Heres my code. Hope someone can help. Thanks
Dim ds As New DataSet
Dim cn As New SqlConnection()
Dim connString As String = "Data Source=.\SQLEXPRESS;AttachDbFilename=C:\Documents\Runner.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True"
cn.ConnectionString = connString
cn.Open()
Dim da As New SqlDataAdapter("SELECT * FROM Testing", cn)
da.Fill(ds)
|
|
|
|
|
carrigart wrote: SELECT * FROM Testing
Is this query executing successfully in query browser?
|
|
|
|
|
How do you use the query browser. Is that the same as the object browser.
I'm not familiar with both of them anyway
|
|
|
|
|
Yeah I figured out how to use the query browser and my query is working fine. It returns the contents of my database. Still getting the same error, so frustrating. 
|
|
|
|
|
and one more thing, the code executes fine when I comment out the line da.Fill(ds), So is there something wrong with my dataset.
|
|
|
|
|
Do you have the database (runner.mdf) included in your project? If you do, select it from the project explorer and from properties, check two things:
- path to the file
- is Copy to output directory true
If copy to output directory is true, you should attach the database from the projects debug/bin folder, since each time you start the project the db is copied to that folder. Also note that in this case, all modifications done by program are not reflected to the original database, which is included to the project.
|
|
|
|
|
Yes the database is included in my project. I have checked the properties and the 'Copy to output directory' is set to 'Copy Always'. I'm not sure that I get you. Is it that the Path to the file should be the file in the debug/bin folder. So would I have to change and connection string and setup a new data source. Bit confused sorry
|
|
|
|
|
carrigart wrote: would I have to change and connection string and setup a new data source
Yes, exactly, you should modify the connection string and attach the mdf from your projects debug/bin folder. You don't have to create a new datasource, just modify the connection string.
carrigart wrote: Bit confused sorry
Nothing to be sorry about 
|
|
|
|
|
Fixed it  . Only took me like a day  . I changed the path off my connection string. Bit of a school boy error . Well its a lesson learnt anyway.
Thanks for your help
|
|
|
|
|
You're welcome
|
|
|
|
|
This may sound daft, but have you tried it by populating a command and then setting the dataadapter.selectcommand to the command?
|
|
|
|
|
Hey gang I got a web browser that I am creating for a group that I belong to. The question is I have everything set up they way it should look. The only thing missing is the ability to block pop ups when debug before I make it a finale cut for distribution. This is my first attempt I got some help form a friend form a different forum but he is stumped as well. I hope some one can point me in to the right direction.
|
|
|
|
|
Hi!
Are you using the .NET webbrowser control? I ask because the features it provides are quite limited so implementing a pop-up blocker from it would be next to impossible. You may want to look into CSEXWB It provides a far richer set of features than the standard control and, though it's written in C#, can easily be added to your VB project.
Hope This Helps!
MrWolfy
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
