<% '抓討論區的名字 Discuss = Request("Discuss") Mydatabase = "../DB/bbs.mdb" set adocon1=Server.CreateObject("ADODB.Connection") param1 = "driver={Microsoft Access Driver (*.mdb)}" adocon1.Open param1 & ";dbq=" & Server.MapPath(Mydatabase) set rs1 = Server.CreateObject("ADODB.Recordset") sqlstr1 = "select * from Discuss where Discuss_ID = '"&Discuss&"' " rs1.Open sqlstr1, adocon1, 1,1 DiscussN = rs1("Discuss_Name") 'rs1.Close 'adocon1.close %>

討論區

你正在<% =DiscussN %>討論區發表新主題 ( 為必填的欄位為一般的欄位)
你的大名 :
電子信箱 :
性別 :
★首頁網址 :
★ICQ :
★8dCall(CICQ) :
主題 :
留言內容 :
 

 

| 回首頁 | goo檔案 | 工作項目 | 作品欣賞 | 下載區 | 留言版 | 聊天室 | 休閒館 | goo信箱 |

蒼穹設計工作室設計製作
COPYRIGHT © 2000 SKY DESIGN STUDIO ALL RIGHTS RESERVED