网站首页  汉语字词  英语词汇  考试资料  写作素材  旧版资料

请输入您要查询的考试资料:

 

标题 ASP + FLASH + ACCESS教程
内容
    ASP部分:
    <%
    added=request("added")
    del=request("del")
    action=request.QueryString("action")
    set conn=server.createObject ("adodb.connection")
    set rs=server.createObject ("adodb.recordset")
    dbpath=server.MapPath ("db1.mdb")
    connstr="Driver={Microsoft Access Driver (*.mdb)};dbq="&dbpath
    conn.Open connstr
    if (action <> "add" and action <>"added") then
    '下面是读取数据库信息部分
    sql="select * from shu where id=1"
    rs.open sql,conn,1,1
    if rs.eof and rs.bof then
    else
    Response.Write "a=" & (RS("number"))
    response.Write "&eof=true"
    end if
    end if
    %>
    <%
    '下面部分为删除按扭信息部分
    if (action="add") then
    sql="select * from shu where id=1"
    rs.Open sql,conn,1,3
    rs("number")=del
    rs.update
    response.write "ok=1"
    rs.close
    end if
    %>
    <%
    '下面的部分是保存按扭信息部分
    if (action="added") then
    sql="select * from shu where id=1"
    rs.Open sql,conn,1,3
    rs("number")=added
    rs.update
    response.write "save=1"
    rs.close
    end if
    %>
    FLASH部分:
    第一部分是初始化变量:
    eof = "false";
    a=0; //按扭的初始数量
    r = random(65500);
    loadVariables("read.asp?action=" add r, "");//添加随机数的目的是防止不同浏览器不无法刷新变量的(不过可能是画蛇添足,哈哈)第9贞:
    if (eof ne "true") {
    gotoAndPlay("read");
    }
    判断是否读取数据成功!
    第十贞:
    a = Number(a);
    if (a == 0 or a<0) {
    a = 1;
    for (i=1; i<=a; i++) {
    _root.attachMovie("m"+i, "m"+i, i+1);
    if (i<=5) {
    eval("m"+i)._x = 200+i*eval("m"+i)._width;
    eval("m"+i)._y = 200;
    }
    if (i>5 and i<=10) {
    eval("m"+i)._x = i*eval("m"+i)._width-50;
    eval("m"+i)._y = 250;
    }
    }
    } else {
    for (i=1; i<=a; i++) {
    _root.attachMovie("m"+i, "m"+i, i+1);
    if (i<=5) {
    eval("m"+i)._x = 200+i*eval("m"+i)._width;
    eval("m"+i)._y = 200;
    }
    if (i>5 and i<=10) {
    eval("m"+i)._x = i*eval("m"+i)._width-50;
    eval("m"+i)._y = 250;
    }
    }
    }
    stop();
    //根据数据库中按扭数量"a"的大小添加按扭,并且以5*2的顺序进行排序!加载按扭:
    on (release) {
    if (a<=10 and a>=1) {
    a =Number(a)+1;
    trace(a);
    _root.attachMovie("m"+a, "m"+a, a+1);
    if (a<=5) {
    eval("m"+a)._x = 200+a*eval("m"+a)._width;
    eval("m"+a)._y = 200;
    }
    if (a>5 and a<=10) {
    eval("m"+a)._x = a*eval("m"+a)._width-50;
    eval("m"+a)._y = 250;
    }
    }
    if (a>10) {
    _root.aa.attachMovie("wrong", "wrong", 1000);
    this.wrong._width = 600;
    this.wrong._height = 400;
    this.wrong._x = 225;
    this.wrong._y = 200;
    a=10
    }
    }
    根据A的数量进行在次加载按扭(这里只采用FLASH内部加载),如果超按扭数量超过10个,则停止加载并出现警告!删除按扭部分:
    on (release) {
    del = a-1;
    loadVariables("read.asp?action=add", "", "POST");
    for(i=1;i<=a;i++){
    removeMovieClip(eval("m"+i));
    }
    gotoAndPlay("do_del");
    }
    //确定删除后A的值,并将其传送个ASP!但是此处需要清理FLASH内部A的数量,以防止FLASH内部没有刷新而造成删除后A的数量减少,但按牛数量没有减少的情况!保存按扭部分:
    on (release) {
    added = a;
    for(i=1;i<=a;i++){
    removeMovieClip(eval("m"+i));
    }
    loadVariables("read.asp?action=added", "", "POST");
    gotoAndPlay("do_save");
    }//将A的数值传给ASP 然后存到数据库中,此处也清空了FLASH内部A的值,原因同上!
随便看

 

在线学习网考试资料包含高考、自考、专升本考试、人事考试、公务员考试、大学生村官考试、特岗教师招聘考试、事业单位招聘考试、企业人才招聘、银行招聘、教师招聘、农村信用社招聘、各类资格证书考试等各类考试资料。

 

Copyright © 2002-2024 cuapp.net All Rights Reserved
更新时间:2025/5/17 15:22:26