fetchnews.asp

Java移动通信程序设计(J2ME MIDP)范例

<%
Response.CharSet="GB2312"  
  
Set cnnDB = Server.CreateObject("ADODB.Connection")
cnnDB.Open "MIDPDB"

set records = Server.CreateObject("ADODB.Recordset")
records.Open "news",cnnDB
do while not records.eof
  Response.Write records("title")
  Response.Write "   "

  records.MoveNext
loop

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

%>