stars.asp

来自「Java移动通信程序设计」· ASP 代码 · 共 40 行

ASP
40
字号
<HTML>

<BODY>

<%
  
Set cnnDB = Server.CreateObject("ADODB.Connection")


cnnDB.Open "MIDPDB"

delSQL = "DELETE * FROM stars"
cnnDB.Execute delSQL

for i=1 to 12
    
    starSQL = "INSERT INTO stars(content,starname) values('" &_
               Request("txt" & i) & "','" & Request("hidden" & i) & "')"
    cnnDB.Execute starSQL
next
set records = Server.CreateObject("ADODB.Recordset")
records.Open "stars",cnnDB
do while not records.eof
   Response.Write records("starname")
   Response.Write " : "
   Response.Write records("content")
   Response.Write "<br/>"
   records.MoveNext
loop

records.close
set records = nothing
cnnDB.Close
set cnnDB = nothing

%>

</BODY>
</HTML>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?