My problem is this:
I have an Access Database wich I connect to Using ADO.
I want to change a certain String of text ( hello ) in the HTML file to the
Text in one of My Database Fields.

When I change the text without connecting to the Database it works fine.
Below is the code as I have it now. At the moment I just get the Temp.htm
but it turns blank ( it has the default "hello" in there to start of with)

Can someone help me please?

Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim cmd As String
Dim sql As String

cmd = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path &
Set cn = New ADODB.Connection
cn.ConnectionString = cmd

sql = " SELECT * FROM CD"
Set rs = New ADODB.Recordset
rs.Open sql, cn, adOpenForwardOnly, adLockOptimistic
Do While Not rs.EOF
KK = rs("CDName")

Set cn = Nothing

Open App.Path & "\HTML\cview.htm" For Input As #1
Open App.Path & "\HTML\temp.htm" For Output As #2
Line Input #1, Temp
Temp = Replace(Temp, "hello", KK)
Print #2, Temp
Close #2
Close #1

End Sub