<%Set conn = Server.CreateObject("ADODB.Connection") conn.open "BulletinBoard", "", "" Set rsNew = Server.CreateObject("ADODB.Recordset") SQL = "SELECT * FROM BulletinBoard " rsNew.open sql, conn, 3, 3 rsNew.AddNew rsNew("BBName") = Request.Form("BBName") rsNew("BBEmail") = Request.Form("BBEmail") rsNew("Subject") = Request.Form("Subject") rsNew("Message") = Request.Form("Message") rsNew("ResponseTo") = Request.Form("ResponseTo") rsNew("BBHomepageName") = Request.Form("BBHomepageName") rsNew("BBHomepageURL") = Request.Form("BBHomepageURL") rsNew("ImageURL") = Request.Form("ImageURL") BBName = rsNew("BBName") BBEmail = rsNew("BBEmail") Subject = rsNew("Subject") Message = rsNew("Message") ResponseTo = rsNew("ResponseTo") BBHomepageName = rsNew("BBHomepageName") BBHomepageURL = rsNew("BBHomepageURL") ImageURL = rsNew("ImageURL") %> <%rsNew.Update rsNew.close set rsNew = nothing%> Bulletin Board
Bulletin Board

Use of this bulletin board means you have read and agree to our rules.

[ Follow Ups ] [ Post Follow Up ] [ Bulletin Board ] [ FAQ ]