利用ASP巢狀JS+SQL Server打造兩級連動下拉框(二) (轉)

利用ASP巢狀JS+SQL Server打造兩級連動下拉框(二) (轉)[@more@]

  利用巢狀JS+ SERVER打造兩級連動下拉框（2）

TwoLevel.asp

:namespace prefix = o ns = "urn:schemas--com::office" />

 

 

  dim conn 

  dim connstr

  on error resume next

  set conn=server.Create("ADO.connection")

  connstr="={};server=wen;uid=sa;pwd=;database=DB_ProvinceCat"

  conn.Open connstr

 

  set Rs=server.createobject("ADODB.recordset")

  Rs.CursorLocation = adUseClient 

  SQL=" * from Tb_Province"

  Rs.open SQL,conn,1,1

  if Not Rs.Eof then

    Dim str

    strJScript=""

  Response.Write("

   Rs.Close

   Set Rs=Nothing

  end if

  Conn.close

  set conn=nothing

 

 

%>

 

 

   

 

請選擇：

第三，進行程式碼。

本在+IIS+SQL Server7.0環境下除錯透過。

  （全文完）