[RESOLVED] [2005] Advert

Hello All,

I've finished (pretty much), a nifty program for my company that sends out automated Advertisments that you set up using a template, some Items you select.

It pulls the information from SQL Server 2000, and then writes an HTML file (based on the template - the template has tags in it, like <!!!!HEADER!!!!>, that I use a stringbuilder to replace with more HTML code around the data).

Here is the problem - when I view the final HTML document that is going to be e-mailed, all comma's in the pulled data from SQL server are missing, so sentences run together. What is odder, is that commas in the footer HTML are fine (not pulled from SQL Server). Even odder still is some commas that I wrote myself directly in the template HTML file ARE also MISSING in the final one.

Here is an idea of what it's doing:

VB Code:

For Y = 0 To Me.tblMfg_Prod_Desc.Rows.Count - 1
    bodyString.AppendLine("<LI>" & Me.tblMfg_Prod_Desc.Rows(Y)("Mfg_Bullet") & "</LI>")
Next Y

That is where it's stripping out the commas. Why?

Nevermind. It appears to be an issue with sending HTML e-mails, actually. The HTML document itself is fine.

Okay, I'm using .NET 2.0. Here is my e-mail code. It loads the entire HTML document into a string, then replaces parts of that string with the header and footer strings (because each email goes to stores with Reps, we want each email to display rep info and so on when mailed). So if the HTML document is fine, that means it's f***ing up when it's mailing:

VB Code:

'create message
AdvertEmail.IsBodyHtml = True
AdvertEmail.Body = strHTMLTemplateData
AdvertEmail.Subject = tblAdvert_Header.Rows(X)("Advert_Description")
AdvertEmail.From = AdvertEmailAddressesC.Item(2)
 
'send the message
oMsg.Send(AdvertEmail)

Is the problem because I am loading the entire HTML document into a single string, then replacing parts of it? Do strings in VB 2005 erase commas?

I think I know the issue, but I need help to fix it, please:

I've never learned how to use the "streamreader" and so on, classes for File I/O. I know, go ahead, yell at me. I still use FileOpen() and Input().

Buuuut, VB .NET from 2002 and up removes commas when bringing a string in, doesn't it?

Please, tell me, how do I use a streamreader? What do I do? I don't understand why it has to be an array of bytes and so on. How does it work? What do I do to just load a file, the entire thing, into one string?

if it is 2005 like you say, you should try using the "My" namespace for file interaction.

VB Code:

My.Computer.FileSystem.*

another tip, you get the StreamReader and StreamWriter classes with the System.IO namespace

Yes, I know where the classes are. What my issue is, I have no idea how to use them...they confuse me. I need to get this done today and I was hoping someone knew a snippet of code to simply pull in an entire file to one string...I'll keep trying...

Figured it out :)

VB Code:

Dim newFileStream As System.IO.FileStream
        Dim bytesRead(1024) As Byte
        Dim byteConvert As New System.Text.UTF8Encoding
 
        newFileStream = New System.IO.FileStream("C:\42.html", IO.FileMode.Open)
 
 
        Do While newFileStream.Read(bytesRead, 0, 1024)
            Me.RichTextBox1.Text = Me.RichTextBox1.Text & byteConvert.GetString(bytesRead, 0, 1024)
 
        Loop