• asp获取数据库表名和字段名

    post by Holmesian / 2009-6-8 17:38 Monday
    连接好数据库之后 可以用以下代码枚举出数据库的表名

    阅读全文>>

  • 完美实现Excel的xls文件转access的MDB文件

    post by Holmesian / 2009-5-11 13:51 Monday
    之前已经[url=http://www.holmesian.org/xls-dbf-vb-asp-access-sql/]多次提到access等数据库转换成xls的Excel文件的方法[/url],

    今天准备讲一下有关Excel的xls文件转换成Access的Mdb文件的方法。

    可以通过[color=#DC143C]asp程序[/color]以及[color=#8B0000]本地软件[/color]的方法实现这个功能。

    如果可以的话推荐使用本地软件  如强大的 [color=#4169E1]xlstomdb[/color] 软件

    可以非常简单的实现相关的功能

    鉴于网上XlsTomdb软件非常难找,而且找到的大多都是未注册版本,有导入和转换数据最多1000条的限制

    所以这里放上一个已经破解过了的xlstomdb  完全忽略1000条的限制







    至于通过asp程序来实现xls转成Access数据库mdb文件的方法也比较简单
    只是在对不同的xls文件可能要稍作调整   源码如下

    [quote]<%function exctoacc(excpath,mdbpath)
        Dim excConn,Coon
        Dim excStrConn,strConn
        Dim excrs,rs
        Dim excSql
        Set excconn=Server.CreateObject("ADODB.Connection")
        Set excrs = Server.CreateObject("ADODB.Recordset")
        excStrConn="Driver={Microsoft Excel Driver (*.xls)};DriverId=790; DBQ="&Server.MapPath(excpath)
        excconn.Open excStrConn
        excSql="select * from [Sheet1$]"  '查询excel语句
        excrs.Open excSql,excconn,2,2  
            set rs=server.createObject("ADODB.Recordset")
            Set conn=Server.CreateObject("ADODB.Connection")
            StrConn="provider=microsoft.jet.oledb.4.0; data source="&Server.MapPath(mdbpath)
            conn.Open StrConn
            del_str="delete * from Sheet1"
            conn.execute  del_str
            sql="select * from Sheet1"  '修改  这里改成相应的sheet的名称
            rs.open sql,conn,1,3
                do while Not excrs.EOF
                    rs.addnew
                        for i=0 to excrs.Fields.Count-1
                            rs(i+1)=excrs(i)
                        next
                    rs.update
                    excrs.MoveNext
                Loop
            rs.close
            set rs=nothing
        excrs.close
        set excrs=nothing
        excConn.close
        set excConn=nothing
        conn.close
        set conn=nothing
        exctoacc="<script>alert('数据导入成功!');javascript:window.location.href='index.htm'</script>"
        
        End function

        %>[/quote]


    调用方法:         response.write exctoacc("a.xls","old.mdb")
    附件下载:
    XlsToMdb.rar 255字节
    mdbviewerplus.rar 255字节
  • asp将数据库导出各种数据文件

    post by Holmesian / 2009-4-3 14:50 Friday
    完美地从数据导出数据到Excle文件 xls -标准的Excel格式,不是网上流传的那种空格符储存的文本模式 或者是网页代码保存的Excel文件。  同时这样做也解决了数据库导出到Excel文件时,如果有长数字数据会采用科学计数法的问题(如身份证,学号等数据)。 堪称完美的导出Excel xls文件的方法

    阅读全文>>

  • 大战后的伤痕

    post by Holmesian / 2009-3-28 12:11 Saturday
    刚考试完网络工程师

    应该没有什么问题  该复习的都复习到了  不会的还是不会 呵呵


    回头看服务器:   基本上大部分网站都恢复正常了

    但是有一个网站不幸地挂掉了   究其原因     ASP+ACCESS的网站结构,数据库文件改名成了.asp
    某个家伙用一个webshell执行了批量挂马操作  结果连同数据库的.asp文件也一同加入了非法内容  结果数据库挂了

    这个虚拟站点应该是用的动网的内核   又是那个万恶的upfile无组件上传变量过滤不干净的问题(不知道多老之前的问题了…………)


    给广大还在用asp+ACCESS网站的TX们提个醒   以后不要把数据库名字后缀改成asp了    遇到这种情况很郁闷的!

    推荐的解决方法是去掉数据库的后缀名  这样在Windows系统中数据库在URL中将会被解析成一个目录  无法下载的

  • Tips for ASP and ACCESS

    post by Holmesian / 2009-3-8 16:40 Sunday
    一个快乐的周末,送完S.H后回Office
    非常无奈地修改上学期做的一个学院的管理系统,下面是今天用到的一些些小东西,放在这里,需要的人自然看得明白
    呵呵

    阅读全文>>

  • ASP实现Excel数据导入ACCESS

    post by Holmesian / 2008-11-2 9:40 Sunday

    ASP操作EXCEL和ACCESS的方法1

    这种方法是通过过程的形式进行调用  效果不错

    先查询Excel  再导入到ACCESS中

    功能函数如下:

    阅读全文>>

  • Word密码破解工具

    post by Holmesian / 2008-5-4 22:49 Sunday
    微软的Office系列中的Word是我们经常用到的文字处理软件

    有人经常遇到这样的问题:“我的日记写在office 文档(doc文件)中,但是密码忘记了,怎么办啊?”

    “我有很重要的资料在这个Office文档(doc文件)里面,但是密码忘了,怎么办啊??”

    …………

    阅读全文>>