?
Solved

Read in large sql query from file VB.NET

Posted on 2011-03-04
7
Medium Priority
?
768 Views
Last Modified: 2012-05-11
Hey guys does anyone know how to read in a large sql query from a file into vb.net?

I tried using a stream reader to read in the contents of the sql query but I'm losing all of the CRLF's and that's causing the ExecuteDataReader to fail.

I need to be able to preserve all of the CRLF's that take place in the query I guess...

Suggestions greatly appreciated!

Thanks!
0
Comment
Question by:romieb69
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 4
  • 2
7 Comments
 
LVL 23

Assisted Solution

by:Rajkumar Gs
Rajkumar Gs earned 1000 total points
ID: 35039727
Try this code

 Dim fileText as string = My.Computer.FileSystem.ReadAllText("c:\AnyFile.txt")

Raj
0
 

Author Comment

by:romieb69
ID: 35040264
That seems to do the same thing. CRLF's are not included in the string.

One Idea I had was maybe to do a line read and then append a CRLF at the end of each of those in a string builder ??? Hoping there is an easier way to do this though with less code.
0
 
LVL 23

Expert Comment

by:Rajkumar Gs
ID: 35040302
That idea should work.

I have no computer right now to figure out your current issue.

Raj
0
Optimize your web performance

What's in the eBook?
- Full list of reasons for poor performance
- Ultimate measures to speed things up
- Primary web monitoring types
- KPIs you should be monitoring in order to increase your ROI

 

Author Comment

by:romieb69
ID: 35040453
Well that was close... but not quite there yet.  Doing something like this certainly worked as far as preserving the CRLF's:

Dim strContents As New StringBuilder
Dim objReader As StreamReader
objReader = New StreamReader(FullPath)
    Try
           Do While objReader.Peek() >= 0
                strContents.Append(objReader.ReadLine())
                strContents.Append(vbCrLf)
            Loop
....

When you look at strContents.ToString you can see that all the carriage returns and line feeds are in place... but when I pass it into :   sqlCmd.CommandText = sqlStr.ToString
the value of sqlCmd.CommandText no longer has the crlf's ... it's all one long string with no CRLF delimeters.  

Humm so this seems to be an issue with Data.SqlClient.SqlCommand ... I wonder what would happen with SqlTransaction??  

0
 

Accepted Solution

by:
romieb69 earned 0 total points
ID: 35040600
Ok I think I got this figured out... couple things about this:

1. Do not use the word GO in your script. Causes errors.
2. Use ExecuteNonQuery


Attached is the code that works:

Hope this helps someone!!
=)
Imports System.Data.SqlClient
Imports System.IO
Imports System.Text
Public Class frmMain

    'Create a connection string 
    Public strConString As String
    Public conHistDB As New SqlConnection(strConString)
    Public sqlCmd As New SqlCommand
.....


Try
                sqlCmd.Connection = conHistDB
                sqlStr = GetFileContents(txtScriptsPath.Text + "\DropAndCreateAllTables2.sql")
                'sqlStr = My.Computer.FileSystem.ReadAllText(txtScripts.Text + "\DropAndCreateAllTables.sql")


                sqlCmd.CommandText = sqlStr.ToString
                sqlCmd.ExecuteNonQuery()

            Catch ex As Exception
                rtbActivityMon.AppendText(ex.Message.ToString)

            End Try
.....


Public Function GetFileContents(ByVal FullPath As String, _
       Optional ByRef ErrInfo As String = "") As StringBuilder

        Dim strContents As New StringBuilder
        Dim objReader As StreamReader

        Try

            objReader = New StreamReader(FullPath)
            Do While objReader.Peek() >= 0
                strContents.Append(objReader.ReadLine())
                strContents.Append(vbCrLf)
            Loop
        Catch ex As Exception
            rtbActivityMon.AppendText(ex.Message.ToString)
        End Try
        Return strContents
    End Function

Open in new window

0
 
LVL 33

Expert Comment

by:Todd Gerbert
ID: 35043756
I'm not sure if your issue & solution was the "GO" keyword/ExecuteNonQuery, or the CRLF thing, but just wanted to point out that File.ReadAllText leaves the CRLF's in tact, as they appear in the file.

If you're actually not seeing them after File.ReadAllText, could be that 1) When you hove the mouse over a string variable in Visual Studio while debugging it doesn't show the CRLF's, but they're there - or 2) the file you're reading from has a UNIX-style format, with newline's at the end of each line instead of Windows' carriage return/linefeed pair.

Probably neither here nor there anyway, just felt compelled to espouse my two cents. ;)
0
 

Author Closing Comment

by:romieb69
ID: 35081184
Accepted own solution because it works =)
0

Featured Post

On Demand Webinar: Networking for the Cloud Era

Ready to improve network connectivity? Watch this webinar to learn how SD-WANs and a one-click instant connect tool can boost provisions, deployment, and management of your cloud connection.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Performance in games development is paramount: every microsecond counts to be able to do everything in less than 33ms (aiming at 16ms). C# foreach statement is one of the worst performance killers, and here I explain why.
This article aims to explain the working of CircularLogArchiver. This tool was designed to solve the buildup of log file in cases where systems do not support circular logging or where circular logging is not enabled
Via a live example, show how to extract information from SQL Server on Database, Connection and Server properties
Using examples as well as descriptions, and references to Books Online, show the documentation available for datatypes, explain the available data types and show how data can be passed into and out of variables.
Suggested Courses

777 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question