Oracle数据库查询表空间位置、创建表空间、创建用户以及数据库导入

-查询数据库表空间位置:

select tablespace_name,file_id,bytes/1024/1024,file_name from dba_data_files order by file_id;

在这里插入图片描述
-查询数据库表空间使用情况:

SELECT tablespace_name ,
       ROUND(SUM(bytes) / (1024 * 1024), 2) AS "已分配大小(MB)",
       ROUND((SUM(maxbytes - bytes)) / (1024 * 1024), 2) AS "未分配大小(MB)"
FROM dba_data_files
GROUP BY tablespace_name;

-创建数据库临时表空间:

create temporary tablespace ERP_TEMP
tempfile '/home/oracle/app/oracle/oradata/helowin/ERP_TEMP.dbf'
size 1024m
autoextend on
next 500m maxsize unlimited
extent management local;

-创建数据库表空间:

create tablespace FKS_DATA_TBS
datafile '/home/oracle/app/oracle/oradata/helowin/FKS_DATA_TBS.dbf'
size 1024m
autoextend on 
next 500m maxsize unlimited 
extent management local; 

-创建用户及授权:

-- Create the user 
create user user01 identified by user01
  default tablespace FKS_DATA_TBS
  temporary tablespace ERP_TEMP
  profile DEFAULT
  quota unlimited on FKS_DATA_TBS;
-- Grant/Revoke object privileges 
grant read, write on directory SYS.DATA_PUMP_DIR to user01;
-- Grant/Revoke role privileges 
grant connect to user01;
grant dba to user01;
grant resource to user01;
-- Grant/Revoke system privileges 
grant create synonym to user01;
grant create view to user01;
grant unlimited tablespace to user01;

imp方式导入用户:

imp user01/user01@127.0.0.1:1521/Oracle fromuser=user touser=user01 file="D:\Temp\user.dmp" log="D:\Temp\toUser01.dmp"

数据库导出导入参考:https://blog.csdn.net/weixin_45964650/article/details/115213095

  • 3
    点赞
  • 18
    收藏
    觉得还不错? 一键收藏
  • 4
    评论
要实现这个需求,需要先了解一下 ACCESS 中的 VBA 编程语言和 Oracle 数据库的连接方式。 1. 连接 Oracle 数据库 在 VBA 中连接 Oracle 数据库,需要使用 ADODB(ActiveX Data Objects)对象。代码如下: ``` Dim conn As New ADODB.Connection conn.ConnectionString = "Provider=OraOLEDB.Oracle;Data Source=myOracleDB;User ID=myUsername;Password=myPassword;" conn.Open ``` 其中,`myOracleDB` 是 Oracle 数据库的名称,`myUsername` 和 `myPassword` 分别是连接数据库用户名和密码。 2. 查询 ACCESS 数据库中的数据 在 VBA 中查询 ACCESS 数据库中的数据,可以使用 ADO(ActiveX Data Objects)对象。代码如下: ``` Dim rs As New ADODB.Recordset rs.Open "SELECT * FROM myTable", conn ``` 其中,`myTable` 是 ACCESS 数据库中的名。 3. 导入数据到 Oracle 数据库中 在 VBA 中将查询出来的数据导入Oracle 数据库中,可以使用 SQL 语句。代码如下: ``` Dim sql As String sql = "INSERT INTO myOracleTable VALUES (value1, value2, ...)" conn.Execute sql ``` 其中,`myOracleTable` 是 Oracle 数据库中的名,`value1`、`value2` 等是要插入的数据值。 综合起来,可以编写如下的 VBA 代码实现按钮点击事件查询数据后导入到连接的 Oracle 数据库中: ``` Private Sub btnImport_Click() ' 连接 Oracle 数据库 Dim conn As New ADODB.Connection conn.ConnectionString = "Provider=OraOLEDB.Oracle;Data Source=myOracleDB;User ID=myUsername;Password=myPassword;" conn.Open ' 查询 ACCESS 数据库中的数据 Dim rs As New ADODB.Recordset rs.Open "SELECT * FROM myTable", conn ' 将数据导入Oracle 数据库中 Do Until rs.EOF Dim sql As String sql = "INSERT INTO myOracleTable VALUES (" & rs.Fields("Field1").Value & ", " & rs.Fields("Field2").Value & ", ...)" conn.Execute sql rs.MoveNext Loop MsgBox "数据导入成功!" End Sub ``` 其中,`Field1`、`Field2` 等是 ACCESS 数据库中的字段名,`...` 示还有其他字段需要导入
评论 4
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值