html file adding "'s

[Ephesians]

I'm using this code to transfer html tags from from my database to an html file. However, during the writing process two "s are added to the front and back end of the file because it's a string. How can I write to a file and not include the "s? The codes still launch ok and I can preview what it's going to look like but the "s detract from the look.

Dim temppath As String, slength As Integer, strFilename As String, strTags As String
Dim tagfile As SHELLEXECUTEINFO
temppath = Space(255)
slength = GetTempPath(255, temppath)
temppath = left(temppath, slength)
strFilename = temppath & "tmptags.html"
strTags = Tags.Value
If Dir(strFilename) <> "" Then Kill (strFilename)
Open strFilename For Output As #1
Write #1, strTags
Close #1
With tagfile
     .cbSize = Len(tagfile)
     .hwnd = Me.hwnd
     .lpDirectory = temppath
     .lpFile = temppath & "tmptags.html"
     .lpVerb = "open"
     .nShow = SW_SHOWNORMAL
End With
Call ShellExecuteEx(tagfile)