asp.net环境下的链接点击计数--方案2

来源:互联网 发布:那曲数控编程人才网 编辑:程序博客网 时间:2024/05/18 03:18

      var adCmdText="&H0001";
      var adInteger=3;
      var adParamInput="&H0001";

     //上述的三个变量在操作系统目录下(%systemroot%/system32/adovbs.inc),vb中导入即可,如下句:

<%--<!--#include virtual="~/adovbs.inc"--> --%>(该语句已注释)
      function IncreaseClicks(id)
      {

        var conn = new ActiveXObject("ADODB.Connection");
        var cmd = new ActiveXObject("ADODB.Command");//必须注册组件scrrun.dll,(msxml3.dll 或许不用)(regsvr32 scrrun.dll )
        var connstr="DRIVER={SQL Server};server=127.0.0.1;database=ttldb;uid=ttl;pwd=ttldbpwd;";
        conn.Open(connstr);
        cmd.ActiveConnection = conn;
       
        cmd.CommandType = adCmdText;//adovbs.inc中的adCmdText值为&H0001
        cmd.CommandText= "update Tb_FlashFile set FF_Clicks=FF_Clicks+1 where FF_Id=?";

        cmd.Parameters.Append(cmd.CreateParameter("@FF_Id" , adInteger, adParamInput, 4, id));

        cmd.Execute();
        conn.close();
      }

原文件如下:

opus.aspx

 

<%@ Page Language="C#" AutoEventWireup="true" Inherits="opus" CodeFile="opus.aspx.cs" %>

<%@ Register TagPrefix="cc1" Namespace="LtpPageControl" Assembly="LtpPageControl" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
    <title>无标题</title>
    <link href="css/style.css" rel="stylesheet" type="text/css" />
    <%--<!--#include virtual="~/adovbs.inc"--> --%>
    <!-- METADATA type="typelib" file="~/msado20.tlb" -->

    <script id="script1" type="text/javascript">

     var adCmdText="&H0001";
      var adInteger=3;
      var adParamInput="&H0001";

     //上述的三个变量在操作系统目录下(%systemroot%/system32/adovbs.inc),vb中导入即可,如下句:

<%--<!--#include virtual="~/adovbs.inc"--> --%>(该语句已注释)
      function IncreaseClicks(id)
      {
        var conn = new ActiveXObject("ADODB.Connection");
        var cmd = new ActiveXObject("ADODB.Command");//必须注册组件scrrun.dll,(msxml3.dll 或许不用)(regsvr32 scrrun.dll )
        var connstr="DRIVER={SQL Server};server=127.0.0.1;database=ttldb;uid=ttl;pwd=ttldbpwd;";
        conn.Open(connstr);
        cmd.ActiveConnection = conn;
       
        cmd.CommandType = adCmdText;//adovbs.inc中的adCmdText值为&H0001
        cmd.CommandText= "update Tb_FlashFile set FF_Clicks=FF_Clicks+1 where FF_Id=?";

        cmd.Parameters.Append(cmd.CreateParameter("@FF_Id" , adInteger, adParamInput, 4, id));

        cmd.Execute();
        conn.close();
      }

    </script>

</head>
<body>
    <form id="form1" runat="server">
        <%--        <asp:ScriptManager ID="ScriptManager1" EnablePageMethods="true" runat="server">
            <Scripts>
                <asp:ScriptReference Path="~/activity/Clicks.js" />
            </Scripts>
            <Services>
                <asp:ServiceReference Path="~/WSClicks.asmx" />
            </Services>
        </asp:ScriptManager>--%>
        <div id="opus" style="width: 672px; height: 402px; background: #e5e5e5; padding: 40px 0 40px 51px;">
            <asp:Repeater ID="Repeater1" runat="server">
                <ItemTemplate>
                    <%--DisplaySWF.aspx?id=<%#Eval("FF_Id") %>--%>
                    <dl>
                        <dt><a href="/activity/flash/<%#Eval("FF_FileName") %>" onclick="IncreaseClicks(<%#Eval("FF_Id")%)" target="_blank">
                            <img alt="" src="/activity/images/<%#Eval("FF_Thumnails")%>">
                        </a></dt>
                        <dd>
                            <a href="/activity/flash/<%#Eval("FF_FileName") %>" onclick="IncreaseClicks(<%#Eval("FF_Id")%)"
                                target="_blank">
                                <%#Eval("FF_Description")%>
                            </a>
                        </dd>
                    </dl>
                </ItemTemplate>
            </asp:Repeater>
            <br />
            <cc1:Page04 ID="Page021" runat="server" Page_Index="opus.aspx" Page_Size="9" Page_Width="622"
                Height="402px" Page_Background="images/bg_38.jpg" Tagp_Background="images/bg_38.jpg">
            </cc1:Page04>
        </div>
    </form>
</body>
</html>

原创粉丝点击