连接好数据库之后 可以用以下代码枚举出数据库的表名

阅读全文>>

之前已经[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")

刚考试完网络工程师

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


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

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

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


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

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

就拿刚才那个例子
在文件头加上 on   error   resume   next

然后判断执行进程的IIS错误代码

这样给用户的就是一个比较友好的界面

<!--#include file="conn.asp"-->
<%
on   error   resume   next

  
conn.exe...

阅读全文>>

   因为特殊原因，需要用asp操作ACCESS结构
在网上查了一下，发现ACCESS数据库功能实在太那个什么，在asp里既不能改名，创建新表新字段也麻烦，甚至还有TX说没办法改名、操作，只能换数据库。

但是通过一会儿的摸索，发现其实ASP也可以利用几条语句组合，实现其他SQL数据库一些基本的功能，虽然远远不如MySQL，MSSQL那样强大，但是作一般的数据库结构升级优化还...

阅读全文>>