%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim Recordset1 Dim Recordset1_cmd Dim Recordset1_numRows Set Recordset1_cmd = Server.CreateObject ("ADODB.Command") Recordset1_cmd.ActiveConnection = MM_zsf_lj_STRING Recordset1_cmd.CommandText = "SELECT * FROM zsf_news" Recordset1_cmd.Prepared = true Set Recordset1 = Recordset1_cmd.Execute Recordset1_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = 10 Repeat1__index = 0 Recordset1_numRows = Recordset1_numRows + Repeat1__numRows %>
名称 | 锦州子洋铸石粉厂 |
电话 | 13700168595 |
邮箱 | 394197138@qq.com |
厂址 | 辽宁锦州汤河子工业区 |
序号 | 新闻名称 | 新闻内容 | 发布时间 |
<%=(Recordset1.Fields.Item("ID").Value)%> | <%=(Recordset1.Fields.Item("new_name").Value)%> | <%=(Recordset1.Fields.Item("neirong").Value)%> | <%=(Recordset1.Fields.Item("fbsj").Value)%> |