Visual Basic

Re: Access vb program via another program

13-Jul-07 6:03

Nope. The OEM app has to be rewritten to "access" your app and use the extra functions.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

swallow4eva16-Jul-07 2:42

swallow4eva

16-Jul-07 2:42

what about this concept.

making one of your vb program executable then when trying to access the vbprogram from another vbprogram. use

'with an onclik event
shell "vbprogram1.exe";

helping someone is actually helping oneselk

Re: Passing parameter to hardcoded SQL statement (non Stored Procedure)

Christian Graus13-Jul-07 3:59

Christian Graus

13-Jul-07 3:59

Well, the main way would be stored procs, if you can't do that, then you can use parameterised querys. Last resort is to do some string mashing to pass in your parameter, but that opens you to SQL injection attacks.

uneasyrider wrote:
Dim strSearch As String
txtSearch.Text = strSearch

This sets your search string to an empty string, of course. It also means your db code is in your presentation layer, which means your app is poorly designed ( well, not designed at all, really ).

I suspect your main problem is that you're not putting '' around your search string.

Christian Graus - Microsoft MVP - C++

"I am working on a project that will convert a FORTRAN code to corresponding C++ code.I am not aware of FORTRAN syntax" ( spotted in the C++/CLI forum )

Re: Passing parameter to hardcoded SQL statement (non Stored Procedure)

Dave Kreskowiak13-Jul-07 4:50

Re: Passing parameter to hardcoded SQL statement (non Stored Procedure)

13-Jul-07 4:50

I HATE when they delete their questions after getting a reply. I had a nice, and long, addendum to your post of grand wisdom and when I hit Submit, CP barfed and I couldn't go back and retry the post... Frown | :(

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

Paul Conrad15-Jul-07 5:45

Paul Conrad

15-Jul-07 5:45

Dave Kreskowiak wrote:
hit Submit, CP barfed

Clean up on aisle six Laugh | :laugh:

"The clue train passed his station without stopping." - John Simmons / outlaw programmer

Re: Passing parameter to hardcoded SQL statement (non Stored Procedure)

Rupesh Kumar Swami13-Jul-07 6:53

Rupesh Kumar Swami

13-Jul-07 6:53

i dont understand where r problem in code project forms coding. SInce question is 45 min ago. & your answer is 2 hour ago. Also subject is different

Please note this bug

Rupesh Kumar Swami
Software Engineer,
Integrated Solution,
Bikaner (India)

Re: Passing parameter to hardcoded SQL statement (non Stored Procedure)

Dave Kreskowiak13-Jul-07 7:00

Re: Passing parameter to hardcoded SQL statement (non Stored Procedure)

13-Jul-07 7:00

This happened because the original poster deleted his question, thereby orphaning the replys he got. It's a known issue and won't be fixed until the next release of the CodeProject web site.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

Paul Conrad15-Jul-07 5:47

Paul Conrad

15-Jul-07 5:47

Yikes this is a mess. I am trying to follow through the Changing color of text... thread. Almost there Laugh | :laugh:

"The clue train passed his station without stopping." - John Simmons / outlaw programmer

Re: Passing parameter to hardcoded SQL statement (non Stored Procedure) [modified]

Rupesh Kumar Swami13-Jul-07 6:54

Rupesh Kumar Swami

13-Jul-07 6:54

i dont understand where r problem in code project forms coding. SInce question is 45 min ago. & your answer is 2 hour 45 minute ago. Also subject is different

Please note this bug

Also note that i reply christian but this reply add to Dave Note this thing

-- modified at 12:59 Friday 13th July, 2007

-- modified at 13:00 Friday 13th July, 2007

Rupesh Kumar Swami
Software Engineer,
Integrated Solution,
Bikaner (India)

Help! Read Unicode Text File to VB program

jackie83sg200513-Jul-07 2:58

jackie83sg2005

13-Jul-07 2:58

Hi,

I am using Visual Studio 2005's Visual Basic developer. I have a problem that i need to extract the unicode from a text file to my progam. And normal character have not a problem but when come to a certain extent of the unicode set, it prompt a error saying that it is invaild.

Here is my code:

OpenFileDialog1.ShowDialog()
Dim direct As String
direct = OpenFileDialog1.FileName
Dim fs As FileStream
fs = New FileStream(direct, FileMode.Open)
Dim sr As StreamReader
sr = New StreamReader(fs)
Dim n1 As Integer
Dim s1(100) As Char
Dim n2 As Integer
n2 = 0
While sr.Peek >= -1
n1 = sr.Read()
s1(n2) = Chr(n1)
n2 += 1
End While

my input is this unicode, §. So when it read from file to here, it prompt the error. So please help me...!

Thanks and Regards,
A person who don't whether he is a newbie or novice. Smile | :)

Christian Graus13-Jul-07 3:29

Christian Graus

13-Jul-07 3:29

jackie83sg2005 wrote:
Dim s1(100) As Char
Dim n2 As Integer
n2 = 0
While sr.Peek >= -1
n1 = sr.Read()
s1(n2) = Chr(n1)
n2 += 1
End While

Wow - what a mess.

1 - why do you limit yourself to 100 characters, instead of using a List or something ?
2 - why do you read one character at a time ?

File.ReadAllText will read an entire file in one line of code.

Christian Graus - Microsoft MVP - C++

"I am working on a project that will convert a FORTRAN code to corresponding C++ code.I am not aware of FORTRAN syntax" ( spotted in the C++/CLI forum )

Paul Conrad13-Jul-07 4:29

Paul Conrad

13-Jul-07 4:29

Christian Graus wrote:
Wow - what a mess.

Just imagine maintaining it in the future :->

"Any sort of work in VB6 is bound to provide several WTF moments." - Christian Graus

jackie83sg200513-Jul-07 4:50

jackie83sg2005

13-Jul-07 4:50

Hi,

thanks for commenting my previous program. I know that it is really in a WOW mess.

I try you method but I still have the unicode conversion problem that I posted in the first thread.

I appreciate your help. I have shorten the whole program as follows:

OpenFileDialog1.ShowDialog()
Dim direct As String
direct = OpenFileDialog1.FileName
Dim str As String
Dim adder As Integer
Dim reader As Integer
reader = 0
adder = 0
str = File.ReadAllText(direct)
reader = str.Length
Do While (adder <> reader)
Try
ComboBox1.Items.Add(str.Chars(adder))
adder += 1
Catch ex As Exception

End Try
Loop

So please help mi from the unicode's ASCII index is 167 after conversion. It is simple when you type in the unicode in to the windows form but I try to retrieve from file. WoW, it is very different and difficult, so need you people out that who is experted in it to help me out...

Thanks and Regards,
A person who do not know whether he is a newbie or novice.

Dave Kreskowiak13-Jul-07 4:54

13-Jul-07 4:54

What does the code look like that wrote the file?? Maybe it's not really Unicode where you think it is.

Or, there's another possilibity. Change the ReadAllText line to:

Imports System.Io
Imports System.Text

.
.
.
 
    str = File.ReadAllText(direct, Encoding.Unicode)

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

Array -> listview1.groups.addrange

jackie83sg200513-Jul-07 15:16

jackie83sg2005

13-Jul-07 15:16

Thanks alot. It works.. But need to manipulate the working of normal File.ReadAllText(direct) and File.ReadAllText(direct, Encoding.Unicode)...

thanks a lot once again

svh198513-Jul-07 2:45

svh1985

13-Jul-07 2:45

how do i make a array and fill the listview1.groups.addrange(arrayname) with the array?

i want to add groups this way so i can sort the array and add the groups name in the right order: A-Z

i dont have a lot experience with arrays.

thanks for your help!

Dave Kreskowiak13-Jul-07 4:19

13-Jul-07 4:19

If you don't know anything about arrays, I highly suggest picking up a book on VB.NET and going through it. Without this basic knowledge, you're going to find most projects impossible to do.

Dim groupNames(2) As String
groupNames(0) = "Group2"
groupNames(1) = "Group3"
groupNames(2) = "Group1"

Array.Sort(groupNames)
For Each groupName As String In groupNames
    ListView1.Groups.Add(New ListViewGroup(groupName))
Next

I've kept this example very simple. There's another method for creating a ListViewGroup array, that can be used with AddRange, that uses an Array's ConvertAll method, but you have to supply a Converter delegate and method to do the conversion from String to a ListViewGroup object. But, if you don't know arrays, this litte topic will not make any sense at all...

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

svh198513-Jul-07 4:39

svh1985

13-Jul-07 4:39

hi thanks four your reply

I do understand how arrays work but i dont know witch type and how i script them.

the code does not work

my code:

        Dim groupNames(2) As String<br />
        groupNames(0) = "Group2"<br />
        groupNames(1) = "Group3"<br />
        groupNames(2) = "Group1"<br />
<br />
        Array.Sort(groupNames)<br />
        '        ListView1.Groups.Add("Group1", "Group1")<br />
        For Each groupName As String In groupNames<br />
            ListView1.Groups.Add(New ListViewGroup(groupName))<br />
        Next<br />
        ListView1.Items.Add("Item1", 0).Group = ListView1.Groups("Group1")<br />
        ListView1.Items.Add("Item2", 0).Group = ListView1.Groups("Group2")<br />
        ListView1.Items.Add("Item3", 0).Group = ListView1.Groups("Group3")<br />
    End Sub

Dave Kreskowiak13-Jul-07 4:47

13-Jul-07 4:47

svanheest wrote:
the code does not work

Define "does not work". What DOES happen?? Do you get an error message??

Is your code running on Windows XP or above? Did you EnableVisualStyles in your project?

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007