<%
Set MyConnection=Server.CreateObject("ADODB.Connection")
MyConnection.Open "DSN=memberdata;UID=;PWD="
Set MyCommand=Server.CreateObject("ADODB.Command")
MyCommand.CommandType=1
MyCommand.CommandText="select * from numadd"
Set MyCommand.ActiveConnection=MyConnection
Set RS1=MyCommand.Execute
%>
=活動內容=
由於有許多網友反映看不懂內容說明，所以站長再換個方式解說：
其實這個活動就是讓會員們每人從１∼５選一個數字，等活動結束後，把所有會員選的數字加總起來
這個總和數字的個位數就決定所有參加此活動會員得的點數獎品
為了幫助網友選擇數字，當您進入本網頁後，便會顯示在您之前已參加過的網友們選的數字總合
您可依據此數字來判斷您應該選擇什麼數字加上去才能讓個位數字最大
要選什麼數字才能讓所有人得到較多點數呢？考驗著會員們的智商及默契！
=加點辦法=
最後累加數字為６９６，每位參加會員皆得２點
<%
Set RS1=Nothing
Set Myconnection=Nothing
Set MyCommand=Nothing
%>