在线数据库管理工具(db007) v1.5(16)

        primarykey = primary("COLUMN_NAME")
    end if
    primary.Close
    Set primary = Nothing

    %>

    <script language="javascript">
        function table_delete()
        {
        if (confirm("确认删除该记录吗？   该操作将不可撤销！！！"))
            return true;
        else
            return false;
        }
    </script>

    <font color=red>表：<%=table_name%></font>    <input type="button" value="刷新本页" onClick="javascript:location.reload()"><br><br>
    <% if request("key") = "editfidlevi" then call editfidlevi() %>
    <table width="600" border="0" cellpadding="1" cellspacing="1" bgcolor="#CCCCCC">
    <tr> 
      <td width="125" height="20" align="center">字 段 名</td>
      <td width="110" align="center">类 型</td>
      <td width="83" align="center"> 设定大小</td>
      <td width="48" align="center">允许空</td>
      <td width="76" align="center">自动编号</td>
      <td width="54" align="center">主键</td>
      <td width="82" align="center">执行操作</td>
    </tr>
    <%
    sql = "SELECT * FROM [" & table_name & "] "
    Set rs = Conn.Execute(sql)
    if err = 0 then
        For i = 0 to rs.fields.count-1
        %>
        <tr> 
          <td height="20" align="left"><%=rs(i).name%></td>
          <td align="left"><%=typ(rs(i).type)%></td>