• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 778
  • Last Modified:

Read in large sql query from file VB.NET

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
romieb69
Asked:
romieb69
  • 4
  • 2
2 Solutions
 
Rajkumar GsSoftware EngineerCommented:
Try this code

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

Raj
0
 
romieb69Author Commented:
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
 
Rajkumar GsSoftware EngineerCommented:
That idea should work.

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

Raj
0
Free Backup Tool for VMware and Hyper-V

Restore full virtual machine or individual guest files from 19 common file systems directly from the backup file. Schedule VM backups with PowerShell scripts. Set desired time, lean back and let the script to notify you via email upon completion.  

 
romieb69Author Commented:
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
 
romieb69Author Commented:
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
 
Todd GerbertIT ConsultantCommented:
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
 
romieb69Author Commented:
Accepted own solution because it works =)
0

Featured Post

Important Lessons on Recovering from Petya

In their most recent webinar, Skyport Systems explores ways to isolate and protect critical databases to keep the core of your company safe from harm.

  • 4
  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now