DATABASE & HTML
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
-- Android Development Center
-- Cloud Development Project Center
-- HTML5 Development Center
-- Windows Mobile Development Center