如何用数据库制作一个多用户版的计数器？

count.asp

' 计数器的核心程序.

<%
Set conn = Server.CreateObject("ADODB.Connection")
dbpath=server.MapPath("count.mdb")
conn.open "driver={Microsoft Access Driver (*.mdb)};dbq="&DbPath
user=Request.QueryString("user")

sql="update counttable set curvalue=curvalue+1 where user='"&user&"'"

' 计数值加1.
conn.Execute sql
sql="select curvalue from counttable where user='"&user&"'"
set rs=conn.Execute(sql)

function chgimg(curvalue)
dim s,i,g
s=cstr(curvalue)
for i=1 to len(s)

' 定义chgimg函数,将计数值用图形表示.

g=g & "<img src=1/" & mid(s,i,1) & ".gif align=bottom>"

' 在正式使用计数器时,图片的路径要用实际路径.

next
chgimg=g
end function

toimg=chgimg(rs("curvalue"))
toimg="document.write(" & "'" & toimg & "')"

' 调用chgimg函数传入计数器值.

Response.Write(toimg)

' 输出.
rs.close
set rs=nothing
conn.Close
set conn=nothing
%>

get.htm

' 申请表单.
<form method="POST" action="getcl.asp">
<p>用户名<input type="text" name="user" size="20"></p>
<p>计数器初始值<input type="text" name="curvalue" size="20"></p>
<p>主页地址<input type="text" name="pageurl" size="20"></p>
<p><input type="submit" value="提交" name="B1"><input type="reset" value="重写" name="B2"></p>
</form>

getcl.asp

' 处理用户的输入的表单,并加入数据库.
<%
Set conn = Server.CreateObject("ADODB.Connection")

' 建立与数据库的连接.
dbpath=server.MapPath("count.mdb")

' 取得数据库的实际路径.
conn.open "driver={Microsoft Access Driver (*.mdb)};dbq="&DbPath
set rs=server.CreateObject("adodb.recordset")

user=Request.Form("user")
pageurl=Request.Form("pageurl")
curvalue=Request.Form("curvalue")

' 取得用户信息.

sql="select * from counttable where user='"&user&"'"

' 检查用户名是否存在.
rs.Open sql,conn,1,3
if not rs.EOF then
Response.Write"<title>申请出错</title>"
Response.Write"噢,用户名已经存在!请重新选择...</title>"

Response.End

' 停止向下处理,要求用户重填.
end if

rs.AddNew
rs("user")=user
rs("pageurl")=pageurl
rs("curvalue")=curvalue
rs.Update

' 将用户信息加入数据库.
rs.Close
set rs=nothing
conn.Close
set conn=nothing
%>

[1]

赞 (0)

相关推荐

  • mysql通过文档读取并执行命令之快速为mysql添加多用户和数据库技巧

    复制代码 代码如下: # vi mysqlusers.txt create database dataname; grant all privileges on dataname.* to username@localhost identified by 'password'; flush privileges; # /usr/local/mysql/bin/mysql -u root -p password < mysqlusers.txt 蓝色斜体部分为对应的用户名和密码,添加多个用户及数据

  • 不用数据库的多用户文件自由上传投票系统(3)

    这是本系统的第四个文件.upload.php主要负责,文件名的校验 ,上传文件和文件地址的归档 <html> <head><title>文件上传</title> <body><div style="width:750"><center> <?php //上传的栏目$col,$upfile上传的文件,$writer作者,$intro简介 $writer=substr(htmlspecialchars

  • 不用数据库的多用户文件自由上传投票系统(2)

    这是本系统的download.php,主要负责下载和记数,其中文件格式均在注释中说明. <html> <?php //传入num为要下载的文件号,col=要下载的分栏 //ip不超时下载次数加一 //文件格式 //0编号<1作者<2文件位置<3投票计数<4简介<5文件大小<6文件下载次数 //ip文件格式  地址:项目:时间 $uploadto="../uploadfile/".$col."/";//上传到的子目

  • 不用数据库的多用户文件自由上传投票系统(1)

    这是我近来开发的一套上传投票一体化的系统,共由4个php和若干记录文件组成,这是第一个view.php,主要负责显示文件列表和上传的文件表单和文件名的检验.其中的地址均为真实地址,请使用时作相应修改,我将在最后1篇提供具体的使用方法. <html> <head> <link rel="stylesheet" href="../css/eccct.css"> </head> <body> <center

  • 如何用数据库制作一个多用户版的计数器？

    count.asp ' 计数器的核心程序. <%Set conn = Server.CreateObject("ADODB.Connection")dbpath=server.MapPath("count.mdb")conn.open "driver={Microsoft Access Driver (*.mdb)};dbq="&DbPathuser=Request.QueryString("user") sql

  • 如何用 Python 制作一个迷宫游戏

    如何用 Python 制作一个迷宫游戏

    相信大家都玩过迷宫的游戏,对于简单的迷宫,我们可以一眼就看出通路,但是对于复杂的迷宫,可能要仔细寻找好久,甚至耗费数天,然后可能还要分别从入口和出口两头寻找才能找的到通路,甚至也可能找不到通路. 虽然走迷宫问题对于我们人类来讲比较复杂,但对于计算机来说却是很简单的问题.为什么这样说呢,因为看似复杂实则是有规可循的. 我们可以这么做,携带一根很长的绳子,从入口出发一直走,如果有岔路口就走最左边的岔口,直到走到死胡同或者找到出路.如果是死胡同则退回上一个岔路口,我们称之为岔口 A, 这时进入左边第二

  • 详解如何用js实现一个网页版节拍器

    目录 引言 1. 需求分析 2. 素材准备 3. 开发实现 3.1 框架选型 3.2 模块设计 3.3 数据结构设计 3.4 播放逻辑 3.5 音频控制 3.6 动效 3.7 大屏展示 3.8 新增人声发音 4. 部署 5. 后续工作 5.1 目前存在的问题 ios声音 5.2 TODO 切换不同音效 引言 平时练尤克里里经常用到节拍器,突发奇想自己用js开发一个. 最后实现的效果如下:ahao430.github.io/metronome/. 代码见github仓库:github.com/ah

  • 如何用angularjs制作一个完整的表格

    由于本人也是边学边写,因此整理的比较乱,下面放出我例子的完整代码,方便大家交流测试,如有问题欢迎评论 首先,表格采用的是BootStrap样式编辑的,主要使用的是angularjs,为了方便也有jQuery的方法,在测试时需自行引入bootstrap,angularjs和jq的文件. 整体代码预览: HTML: <!DOCTYPE html> <html lang="en" ng-app="myModule"> <head> //

  • Python制作一个仿QQ办公版的图形登录界面

    最近,QQ的办公版本--TIM进行了一次更新升级.本次更新升级大幅修改了界面的样式,看起来更加的清爽.简洁和高效了. 这种界面州的先生还是比较喜欢的,没有QQ那么花里胡哨,也比微信那些残缺的功能更加丰富. 并且这次的登录界面还新增了微信登录的选项,看来 TIM 还打算从微信那边争取一部分用户过来. 闲话少说,进入正题. 州的先生看到这个出自大厂的图形界面程序,不由得想用 Python 的图形界面模块来实现一个.在上古时代,前端开发还是被称为"切图仔"的岗位,那时候的一个练手方式就是使用

  • python制作一个简单的gui 数据库查询界面

    一.准备工作: 1.安装mysql3.7,创建一个test数据库,创建student表,创建列:(列名看代码),创建几条数据 (以上工作直接用navicat for mysql工具完成) 二.代码: import sys import tkinter as tk import mysql.connector as sql #--------------------查询函数--------------------------- def sql_connect(): listbox_show.del

  • 用Python制作一个可以聊天的皮卡丘版桌面宠物

    用Python制作一个可以聊天的皮卡丘版桌面宠物

    目录 导语 开发工具 原理简介 步骤实现 导语 前段时间有小伙伴留言说想让我带大家写写桌面小挂件,今天就满足一下留过类似言的小伙伴的请求呗~不过感觉写桌面的挂历啥的没意思,就简单带大家做一只桌面宠物吧~ 废话不多说,让我们愉快地开始吧~ 开发工具 Python版本:3.6.4 相关模块: PyQt5模块: 以及一些Python自带的模块 原理简介 既然要写个桌面宠物,首先当然是要找宠物的图片素材啦.这里我们使用的是来自shimiji这款手机APP上的宠物图片素材,例如皮卡丘: 我下了大约60多种

  • 基于JS制作一个简单的网页版地图

    基于JS制作一个简单的网页版地图

    目录 前言 一.申请地图的AK密钥 二.主要代码分析 三.全部代码 四.结果展示 前言 以前做了一个安卓版的地图应用,现在突然想做一个简单的网页版地图.这个简单的网页版地图能根据城市名进行位置查询(有个城市列表的小控件,支持城市列表选择),还能根据经纬度进行位置查询.当你进行城市搜索时,或者经纬度查询城市时,该小控件也能自由地切换到目标城市. 一.申请地图的AK密钥 1.首先找到一个地图开放平台,这里以百度地图开放平台为例,步骤如下:进入百度地图开放平台,拉到最底下,进行登录注册,然后进入应用管

  • 自己动手写一个java版简单云相册

    自己动手写一个java版简单云相册

    动手写一个java版简单云相册,实现的功能是: 用户可以一次上传一个至多个文件. 用户可以下载其他人上传的图片. 用户可以查看其他所有人的图片. 用户只能删除通过自己IP上传的图片. 用到的技术: 文件上传下载.设计模式.Dom4j.xPath等. 先看下2个页面: 源代码: web.xml: <?xml version="1.0" encoding="UTF-8"?> <web-app version="3.0" xmlns=

  • PHP开发制作一个简单的活动日程表Calendar

    PHP开发制作一个简单的活动日程表Calendar

    材料取之深入PHP与JQuery开发,这本书实际上就是讲述一个活动日程表. 此文章适合从其它语言(如java,C++,python等)转到php,没有系统学习php,或者是php初学者,已经对程序有较深理解的朋友 以上为文件目录结构,public为程序根目录,目的是为了安全方面的考虑,把核心程序放在外界访问不到的地方. 本地的演示地址为:http://localhost/index.php 首先是数据库的脚本: /* Navicat MySQL Data Transfer Source Serv

随机推荐