Output HTML to access page

Vargasman

Registered User.
Local time
Today, 13:09
Joined
Sep 26, 2006
Messages
19
I need some help with this code. As of now when I have people take a test, the code spits out the missed questions with the correct answers as well ass you score to the file C:\test.htm. It works fine on windows 2000 where we can still write to the C:\ drive but I need it to work on XP too. So i want to make the code below create/update to a page within the database itself and not go to the C:\ drive.
Here is the code in question:
Code:
Private Sub cmdEndTest_Click()

    On Error GoTo Errhandler
    
    Dim i As Integer
    
    Close #1

    Open "c:\test.htm" For Output As #1
    
    Print #1, "<p>" & inputname & ", your score is  " & FormatPercent(score / total, 0)
    Print #1, "<p><b> The questions below are the ones that were missed</b></p>"
    For i = 0 To total
        If missedques(i) <> "" Then
            Print #1, "<font color =red><p><b>Question:</b>  " & missedques(i) & "</font>"
        End If
        If realans(i) <> "" Then
            Print #1, "<font color =blue><p><b>Answer:</b>  " & realans(i) & "</font>"
            Print #1, "<hr>"
        End If
    Next
    
    Close #1

Thank you in advance for you help.
 

Users who are viewing this thread

Back
Top Bottom