将access导入SQL server

熟悉SQL SERVER 2000的数据库管理员都知道,其DTS可以进行数据的导入导出,其实,我们也可以使用Transact-SQL语句进行导入导出操作。在 Transact-SQL语句中,我们主要使用OpenDataSource函数、OPENROWSET 函数,关于函数的详细说明,请参考SQL联机帮助。利用下述方法,可以十分容易地实现SQL SERVER、ACCESS、EXCEL数据转换,详细说明如下:

一、SQL SERVER 和ACCESS的数据导入导出

常规的数据导入导出:
使用DTS向导迁移你的Access数据到SQL Server,你可以使用这些步骤:
  ○1在SQL SERVER企业管理器中的Tools(工具)菜单上,选择Data Transformation
  ○2Services(数据转换服务),然后选择 czdImport Data(导入数据)。
  ○3在Choose a Data Source(选择数据源)对话框中选择Microsoft Access as the Source,然后键入你的.mdb数据库(.mdb文件扩展名)的文件名或通过浏览寻找该文件。
  ○4在Choose a Destination(选择目标)对话 Continue reading "将access导入SQL server"

Office Access 2003 简体中文(单文件绿色版)

Pop:Office完整包有几百兆,所以很多人安装绿色精简版,但是一般精简版都没有Access,所以这里提供一个单文件的绿色版给大家。

文件: Access2003.exe
大小: 167752714 字节
文件版本: 11.0.8166
修改时间: 2009年5月17日 星期日, 12:13:29
MD5: 20BB33B7A819E0B126CA10EA4EAA6D2C
SHA1: 7628DA383AFDEB94BF842BF8F6824309A8A58AE7
CRC32: 0066C431

下载说明:
下载后是一个压缩包,里面有两个文件,一个是Access2003.exe,还有一个是文件关联文件

https://dl.pconline.com.cn/download/372922.html
http://www.downcc.com/soft/330.html
http://www.opdown.com/soft/6717.html

ACCESS(MDB)数据库批量修改记录软件

pop:今天对MDB数据库做了一下批量修改,很不错。

首先使用“辅臣MDB数据库浏览器”查看表,然后用这个软件进行对表的批量修改

下载地址:
辅臣MDB数据库浏览器 v1.0
http://down.chinaz.com/soft/8758.htm

http://www.jb51.net/codes/6197.html

sql_langxin.asp的内容:

<%'浪心制作 - 版权所有%>

数据库批量修改记录 - 浪心专用


<% if request("act")="db" then Session("langxin")=Trim(Request.Form("dbname")) Set fso = CreateObject("Scripting.FileSystemObject") filename=server.mappath(""&Session("langxin")&"") if Not fso.FileExists(filename) then Session("langxin")="" Response.Write("

  • 你输入的数据库 "&filename&" 不存在!
  • 请输入正确的数据库地址!
  • " )
    end if
    end if
    if request("act")="del" then
    Session("langxin")=""
    end if
    biao2 = trim(request("biao2"))
    ziduan = trim(request("ziduan"))

    if request("act")="edit" then
    set conn=server.CreateObject("adodb.connection")
    DBPath = server.mappath(""&Session("langxin")&"")
    conn.open "provider=microsoft.jet.oledb.4.0; data source="&DBpath
    biao=request("biao")
    ziduan=request("ziduan")
    huan=request("huan")
    if huan="" then
    Response.Write("

  • 请输入替换的内容!
  • " )
    response.end
    end if

    sql="select * from " & biao & ""
    set rs=server.createObject("adodb.recordset")
    rs.open sql,conn,1,3
    jilu=rs.recordcount
    do while not rs.eof
    rs(""&ziduan&"")=huan
    rs.update
    rs.movenext
    loop
    Response.Write(""&DBPath&"数据库下的"&biao&"表,"&ziduan&"字段被替换为"&huan&",共有记录"&jilu&"。")
    end if
    %>
    <%if Session("langxin")="" then%>

    请输入数据库地址:



    例如:data/123.mdb

    <%end if%>
    <%if Session("langxin")<>"" then
    set conn=server.CreateObject("adodb.connection")
    DBPath = server.mappath(""&Session("langxin")&"")
    conn.open "provider=microsoft.jet.oledb.4.0; data source="&DBpath
    %>

    请选择表:
    <%Set rs=Conn.OpenSchema(20) While not rs.EOF Response.Write("")
    rs.MoveNext
    Wend%>

        

    <%end if%>
    <%if request("biao2")<>"" then
    set conn=server.CreateObject("adodb.connection")
    DBPath = server.mappath(""&Session("langxin")&"")
    conn.open "provider=microsoft.jet.oledb.4.0; data source="&DBpath
    %>

    数据库字段批量修改
    当前数据库:
    <%=DBPath%>
    当前表名:
    " />
    选择字段:

    <% haveid=0 set rs=server.createobject("adodb.recordset") sql="select * from "&biao2&" where 1<>1"
    rs.open sql,Conn,1,1
    j=rs.Fields.count
    For i=0 to (j-1)
    'Response.Write("第" & i+1 & "个字段名:" & rs.Fields(i).Name & "
    ")
    Response.Write("")
    if LCase(rs.Fields(i).Name)="id" then
    Session("haveid")=1
    end if
    Next
    rs.close%>
    替换成:

    此操作是将该字段下的所有数据替换为你指定的内容。

    <%end if%>

    浪心制作 版权所有