module.vb get info from textfile

Question

2.00/5 (1 vote)

See more:

i have module.vb file and i want to get data from textfile...

VB

Dim FILE_NAME As String = Application.StartupPath & "\textfile.txt"
    Dim objReader As New System.IO.StreamReader(FILE_NAME)
    Dim cons1 As String = objReader.ReadLine 'error "declaration expected"
        objReader.Close()
    Dim cons() As String
        cons = cons1.Split(" ") 'error "declaration expected"

Im having an error "Declaration expected". Thanks for the help!

Posted 14-Nov-13 1:20am

jerahmeel salayog

Add a Solution

2 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

OriginalGriff · Answer 1 · 2013-11-14T01:54:00

Solution 1

Without the context it's difficult to be sure, but...is any of this code inside a method? Because if it isn't, then that would cause the errors when you try to use code which doesn't declare a variable, such as:

VB

objReader.Close()

Or

VB

cons = cons1.Split(" ")

Posted 14-Nov-13 1:54am

OriginalGriff

Comments

jerahmeel salayog 14-Nov-13 8:36am

Dim FILE_NAME As String = Application.StartupPath & "\textfile.txt"
Dim objReader As New System.IO.StreamReader(FILE_NAME)
Dim cons1 As String = objReader.ReadLine '
objReader.Close()
Dim cons() As String
cons = cons1.Split(CChar(" "))

Public dbconn As New SqlClient.SqlConnection("Data Source=" & cons(0) & "; Initial Catalog=" & cons(1) & ";User Id=" & cons(2) & "; Password=" & cons(3) & ";")

ive added the rest of the code.. i want to get connection string info from textfile.. thanks!

Mike Meinz · Answer 2 · 2013-11-14T01:56:00

Solution 2

To remove syntax errors, I made the following changes.

1. Added a reference to System.Windows.Forms.
2. Added an Import System.Windows.Forms.
3. Added an Import System.IO.
4. Added CChar(" ") to .Split method parameter to cast the parameter to the Char data type.
5. Put the code inside a method named Test.

VB

Imports System.Windows.Forms
Imports System.IO
Module Module1
    Sub Test()
        Dim FILE_NAME As String = Application.StartupPath & "\textfile.txt"
        Dim objReader As New System.IO.StreamReader(FILE_NAME)
        Dim cons1 As String = objReader.ReadLine '
        objReader.Close()
        Dim cons() As String
        cons = cons1.Split(CChar(" "))
    End Sub
End Module

Posted 14-Nov-13 1:56am

Mike Meinz

Updated 14-Nov-13 1:59am

v4

Comments

jerahmeel salayog 14-Nov-13 8:30am

thanks! one more favor. how can I get the value of cons()?

Mike Meinz 14-Nov-13 8:42am

cons is an array of data type String. You can address individual elements using the syntax cons(index) where index is a value from 0 to cons.GetUpperBound(0). See documentation for Array.GetUpperBound for more information.

jerahmeel salayog 14-Nov-13 8:44am

but how? i have connection string after that test()..

Public dbconn As New SqlClient.SqlConnection("Data Source=" & cons(0) & "; Initial Catalog=" & cons(1) & ";User Id=" & cons(2) & "; Password=" & cons(3) & ";")

Mike Meinz 14-Nov-13 9:19am

I don't understand your issue. It looks like the statement in your posting just above this reply does create a connection string from the contents of the cons() array.

jerahmeel salayog 14-Nov-13 9:26am

yes, you're right!.. my connection string is located in module.vb file..

or maybe, you can suggest other way to have connection string info from textfile?

thanks!

Mike Meinz 14-Nov-13 9:52am

There are so many different ways to do it. Every developer has their favorite ways to do it. I, for example, put the ConnectionString into my application source code. I do not use a database username and password. I use integrated security feature so that the SQL Server uses the user's Windows Network Login credentials. I use conditional compilation to select either development version of the database or the production version of the database. I can do this because my software is run only at one location.
This is how I do it:

#If DEBUG Then
    Public Const STUDIODATABASE_CONNECTIONSTRING As String = "Database=StudioDatabase;Server=NWCTDEV\SQLEXPRESS;Connect Timeout=10;Integrated Security=True;Net=dbmssocn;Application Name=Calendar;"
#Else
    Public Const STUDIODATABASE_CONNECTIONSTRING As String = "Database=StudioDatabase;Server=NWCTDB;Connect Timeout=4;Integrated Security=True;Net=dbmssocn;Application Name=Calendar;"
#End If

If you are developing software that will be distributed to multiple locations and will have a different database server at each location, then you need some external means to deliver the ConnectionString to your application. Some developers use the application's .Config file. See documentation for ConnectionStringsSection Class and Get connection string from app.config file.

Other developers do similar to what you are doing, either put the whole connection string into a text file or INI file or some portion of it.

Still other developers put an entry into the System Registry as part of the installation process.

jerahmeel salayog 14-Nov-13 10:32am

thanks! big THANKS! hope you can help me some other time.