Results 1 to 2 of 2

Thread: Vb cgi bulleton board

  1. Oct 30th, 1999, 09:52 AM #1
    thinh
    thinh is offline

    Thread Starter
    Lively Member
    Join Date
    Jun 1999
    Location
    Garden Grove, CA, USA
    Posts
    110

    Post

    Is there anything wrong with the code below.

    Sub cgi_main()
    Dim Boardbd As Database
    Dim Messages As Recordset
    Dim boardname As String
    Dim Name, Email, Subject, Message As String
    Workspaces(0).OpenDatabase (boardname & ".mdb")
    boardname = GetSmallField("bname")
    Name = GetSmallField("name")
    Email = GetSmallField("email")
    Subject = GetSmallField("subject")
    Message = GetSmallField("message")
    Set Boardbd = Workspaces(0).OpenDatabase(boardname & ".mdb")
    Set Messages = Boardbd.OpenRecordset("bbboard", dbOpenTable)
    Messages.AddNew
    Messages("name") = Name
    Messages("email") = Email
    Messages("subject") = Subject
    Messages("message") = Message
    Messages("parent") = 0
    Messages.Update

    send ("content-type: text/html:")
    send ("<html><title>Message Posted!</title>")
    send ("<h1>Your Message Has been Posted!</h1></html>")
    End Sub

    Please help!!!
    Reply With Quote Reply With Quote
  2. Jan 25th, 2000, 02:00 AM #2
    ufjessey
    ufjessey is offline
    New Member
    Join Date
    May 1999
    Posts
    11

    Post

    What error code you got?

    I code a vb-cgi discussing board since 1999/9.
    Maybe I can help something.

    It's not in English, but you can see the structure. http://ad.boso.com.tw/scripts/index.exe

    Reply With Quote Reply With Quote
« Previous Thread | Next Thread »

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Forum Rules


Click Here to Expand Forum to Full Width