Solved

Read in large sql query from file VB.NET

Posted on 2011-03-04
7
743 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
  • 4
  • 2
7 Comments
 
LVL 23

Assisted Solution

by:Rajkumar Gs
Rajkumar Gs earned 250 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
PRTG Network Monitor: Intuitive Network Monitoring

Network Monitoring is essential to ensure that computer systems and network devices are running. Use PRTG to monitor LANs, servers, websites, applications and devices, bandwidth, virtual environments, remote systems, IoT, and many more. PRTG is easy to set up & use.

 

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

NAS Cloud Backup Strategies

This article explains backup scenarios when using network storage. We review the so-called “3-2-1 strategy” and summarize the methods you can use to send NAS data to the cloud

Question has a verified solution.

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

It was really hard time for me to get the understanding of Delegates in C#. I went through many websites and articles but I found them very clumsy. After going through those sites, I noted down the points in a easy way so here I am sharing that unde…
If you need to start windows update installation remotely or as a scheduled task you will find this very helpful.
This videos aims to give the viewer a basic demonstration of how a user can query current session information by using the SYS_CONTEXT function
Viewers will learn how the fundamental information of how to create a table.

831 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