佳礼资讯网

 找回密码
 注册

ADVERTISEMENT

查看: 919|回复: 6

ASP VB script - Update Database(急)

[复制链接]
发表于 1-4-2006 11:49 AM | 显示全部楼层 |阅读模式
这是我从网上DOWNLOAD的。。。。
我不知道应该怎样去改。。。。
连做得对不对都不懂。。。
我想问各位,可以跟我讲哪一个是我须要改的FileName 吗?
可以把它HIGHLIGHT成红色吗?
因为我的FileName跟他的不同....

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<SCRIPT LANGUAGE="JavaScript">
function DeleteLinks()
{
if (confirm("This will delete the links! Are you sure you want to do this!?"))
{
document.forms[0].action = "Delete2.asp";
document.forms[0].submit();
}
}

function UpdateLinks()
{
if (confirm("This will update the links! Are you sure you want to do this!?"))
{
document.forms[0].action = "Update.asp";
document.forms[0].submit();
}
}
</SCRIPT>

Dim iCount
iCount=0
<%
Dim iCount
iCount=0
%>
    <%
While ((Repeat1_numRows <> 0) AND (NOT rsProducts.EOF))
%>

<%
Repeat1_index=Repeat1_index+1
Repeat1_numRows=Repeat1_numRows-1
rsProducts.MoveNext()
iCount=iCount+1
Wend
%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Fish Database</title>
<style type="text/css">
<!--
.style1 {font-size: 24px}
-->
</style>
</head>

<body><td align="center" valign="top"> <h1 align="left" class="style1">Update Page </h1></td>
<form id="form1" name="form1" method="post">
  <p>&nbsp;</p>
  <table width="639" border="0" align="center">
    <tr>
      <td width="39">Delete</td>
      <td width="219">Name</td>
      <td width="367">Link</td>
    </tr>
    <tr>
      <td valign="top"><label>
        <input type="checkbox" name="checkbox" value="checkbox" />
      </label></td>
      <td valign="top"><label>
          <input type="text" name="Name"
          value="<%=(rsProducts.Fields.Item("sCatName").Value)%>">
      <input type="hidden" name="hiddenfield"
                value="<%=(rsProducts.Fields.Item("SCAT").Value)%>" />
      </label></td>
      <td><label>
        <input type="text" name="<%= (iCount & ".Link") %>"
          value="<%=(rsProducts.Fields.Item("sCatLink").Value)%>" />
        <input type="hidden" name="<%= (iCount & ".ID") %>"  
          value="<%=(rsProducts.Fields.Item("SCAT").Value)%>" />
      </label></td>
    </tr>
    <tr>
      <td><label></label></td>
      <td><label></label></td>
      <td><label></label></td>
    </tr>
    <tr>
      <td height="39" colspan="2" valign="top"><input type="submit" value="Delete Selected Items" onClick="DeleteLinks();" /> </td>
      <td valign="top">
          <input type="submit" value="Update URL Links" onClick="UpdateLinks();" />
          <input type=HIDDEN name=Count value="<%=iCount - 1 %>">          </td>
    </tr>
    <tr>
      <td colspan="3">&nbsp;</td>
    </tr>
  </table>
  <p>&nbsp;</p>
</form>
</body>
</html>

[ 本帖最后由 teatea84 于 1-4-2006 12:13 PM 编辑 ]
回复

使用道具 举报


ADVERTISEMENT

 楼主| 发表于 1-4-2006 11:56 AM | 显示全部楼层
尤其是这些,超不明白
<input type="text" name="<%= (iCount & ".Link") %>"
          value="<%=(rsProducts.Fields.Item("sCatName").Value)%>">

      <input type="hidden" name="hiddenfield"
                value="<%=(rsProducts.Fields.Item("SCAT").Value)%>" />
   
        <input type="hidden" name="<%= (iCount & ".ID") %>"
          value="<%=(rsProducts.Fields.Item("SCAT").Value)%>" />
         
      <input type="text" name="Name"
                value="<%=(rsProducts.Fields.Item("sCatName").Value)%>" />

Products 和Catname 都是FIle Name是吗?
Name 和 Link 之间又有什么分别?
回复

使用道具 举报

 楼主| 发表于 1-4-2006 12:00 PM | 显示全部楼层
我知道我现在这个FILE很乱。。。。
因为我是乱乱来的,之前没学过,现在要交ASIGNEMTN了。。。。
崩溃。。。
如果有什么错了,请高人指点。。。
回复

使用道具 举报

 楼主| 发表于 1-4-2006 12:14 PM | 显示全部楼层
rs 和s 是什么来的?
比如value="<%=(rsProducts.Fields.Item("SCAT").Value)%>" />
回复

使用道具 举报

发表于 1-4-2006 06:25 PM | 显示全部楼层
我说你呀..先去理解HTML..后再来学ASP..
一步一步来..

还有,你的档案是不完整的..
http://www.bjpeu.edu.cn/~yanglb/aspj/
回复

使用道具 举报

发表于 2-4-2006 12:39 AM | 显示全部楼层
你的东西少了很多。

你因该去下载一个guestbook来看看。
回复

使用道具 举报

Follow Us
发表于 12-4-2006 08:36 PM | 显示全部楼层
真够乱的

没错的话 rsProducts应该是object

看到RS 给我的`第一个印象是recordset
应该跟数据库有关
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

 

ADVERTISEMENT



ADVERTISEMENT



ADVERTISEMENT

ADVERTISEMENT


版权所有 © 1996-2023 Cari Internet Sdn Bhd (483575-W)|IPSERVERONE 提供云主机|广告刊登|关于我们|私隐权|免控|投诉|联络|脸书|佳礼资讯网

GMT+8, 22-9-2024 09:34 AM , Processed in 0.097396 second(s), 24 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表