越静，听到的就越多。: 03/25/20

2020年3月25日水曜日

XCOPY：COPYよりスゴ技

１．/E：　ディレクトリ階層をそのままコピーすることが可能です。
/S：空のディレクトリを除いてディレクトリ構造とファイルがコピーされます。
/T：　ディレクトリ構造だけをコピー

　XCOPY コピー元ディレクトリ名コピー先ディレクトリ名 /E

２．/H：　隠しファイル/システムファイルをコピーする事が出来ます。
　XCOPY コピー元ファイル名コピー先パス名 /H

３．/?　簡易ヘルプが表示されます。
　XCOPY /?

４．/EXCLUDE:　除外フィルター、
　　コピーしたくないファイルを除外ファイルに追加できる。
　XCOPY コピー元ファイル名コピー先パス名 /EXCLUDE:c:\exclude.txt
exclude.txtの内容:
\obj\
.vb
.scc
.bak
.pdb
.txt
c:\対象外\

説明：
対象外フォルダ：
　c:\対象外\,
　\obj\
対象外ファイルの拡張子：

　vb,scc,bak,pdb,txt

ORA-22992対策：TMPテーブルによるBLOBのINSERT/SELECT

Remote TableへINSERT新規登録

テーブル定義
--臨時テーブル

クリア臨時テーブル

臨時テーブルへデータ新規登録

リモートテーブルへデータ登録by INSERT SELECT

コミット
COMMIT;

Remote TableよりデータSELECT

クリア臨時テーブル

TRUNCATE TABLE TMP_T1;

リモートテーブルより検索し、臨時テーブルへ新規登録
INSERT INTO TMP_T1 SELECT * FROM T1@WEBORCL;

臨時テーブルよりデータ検索

コミット
COMMIT;

Create Oracle Database Link

DROP DATABASE LINK link001;
-- create in same db.
CREATE DATABASE LINK link001 CONNECT TO myuser IDENTIFIED BY mypassword USING 'SID1'

--create in different db.
CREATE DATABASE LINK link001
CONNECT TO myuser IDENTIFIED BY mypassword
USING '(DESCRIPTION =
(ADDRESS_LIST =
(ADDRESS = (PROTOCOL = TCP)(HOST = HOSTNAME_OR_IP)(PORT = 1521))
)
(CONNECT_DATA =
(SERVICE_NAME = SID1)
)
)';

Docker 概要

Install Docker in openSUSE15(by su)
================================
1. Install Docker
sudo zypper -n in docker
sudo systemctl start docker
sudo systemctl enable docker
sudo gpasswd -a "${USER}" docker
sudo reboot

2. Execute First Docker Image.
$ docker run hello-world

Hello from Docker!
※pull image from Docker-Hub if not found image from local docker repository.

３. Docker command example.
#show docker command help.
docker help

docker run -it --rm tomcat:9.0
docker run -it --rm -p 8888:8080 tomcat:9.0

#same command
docker container create --publish 8888:8080 --name tomcat-container tomcat:9.0

#list all the containers
docker container ls -a
docker ps -a
#start container
docker container start tomcat-container

4. Create a Dockfile.
# we are extending everything from tomcat:9.0 image ...
FROM tomcat:9.0
MAINTAINER root
# COPY path-to-your-application-war path-to-webapps-in-docker-tomcat
#copy war to tomcat /webapps
COPY ./sample.war /usr/local/tomcat/webapps/

docker container stop webserver
docker image rm root/webapps
docker image build -t root/webapps ./ #Dockerfile
docker container run -itd --publish 8888:8080 --name webserver root/webapps

5.docker install mysql

--------------------------------

docker pull mysql

#docker run --name mysql -p 3306:3306 -e MYSQL_ROOT_PASSWORD=123456 -d mysql-test #-p 3306:3306省略可

docker run --name mysql -e MYSQL_ROOT_PASSWORD=123456 -d mysql-test

6.docker install oracle11gxe

docker pull martinsthiago/oraclexe-11g-fig

docker run -d -p 8080:8080 -p 1521:1521 martinsthiago/oraclexe-11g-fig --name oracledb

connect info:

hostname: localhost

port: 1521

sid: xe

username: system

password: oracle

7. Create a User and Grant Permissions in Oracle

CREATE USER rootIDENTIFIED BY mypassword;

GRANT CONNECT TO root;

GRANT CONNECT, RESOURCE, DBA TO root;

GRANT CREATE SESSION TO root;

GRANT ANY PRIVILEGE TO root;

GRANT UNLIMITED TABLESPACE TO root;

GRANT CREATE DATABASE LINK TO root;

8.Open Linux Firewall port

/sbin/iptables -I INPUT -p tcp --dport 8080 -j ACCEPT

/sbin/iptables -I OUTPUT -p tcp --dport 8080 -j ACCEPT

9. Docker save/load image

#show all images

docker images ls -a

REPOSITORY TAG IMAGE ID CREATED SIZE

tomcat8 3.0 90457edaf6ff 6 hours ago 1.036 GB

#Save docker image

docker save 90457edaf6ff > tomcat8.tar

#docker image import for restore

#if exist old version. delete it

docker rmi 90457edaf6ff

#docker load image from tar

docker load < tomcat8.tar

10. Docker export container

Docker export a837d8deb6fb > oracle11gxe.tar

11. Docker export container with gzip

Docker export a837d8deb6fb | gzip -c > oracle11gxe.tar.gz

12. Docker import tar to image

Docker import oracle11g.tar oracle11gxe:1.0

13. Docker import tar to image from tar.gz

cat oracle11g.tar.gz | gzip -d | docker import - oracle11gxe

14. push image to remote repository

#tag local image first, before push to remote.

docker tag oracle11gxe registry.cn-beijing.aliyuncs.com/outaku-nagoya/oracle_docker:oracle11gxe

#push new tag image to remote repository.

docker push registry.cn-beijing.aliyuncs.com/outaku-nagoya/oracle_docker:oracle11gxe

Develop Environment

1. VMware12
license:5A02H-AU243-TZJ49-GTC7K-3C61N
2. openSUSE15 of VM
3. Docker
4. tomcat
5. JDK
6. OracleXE
7. MySQL8

Windows Tools For Linux Server

==============

1, winscp

2, teraterm

臨時テーブルの作成

--臨時テーブル
CREATE GLOBAL TEMPORARY TABLE TEMP_TEST
( ID NUMBER,
IMAGE_DATA BLOB
) ON COMMIT DELETE ROWS ;

INSERT INTO TEMP_TEST VALUES (1, EMPTY_BLOB());
SELECT 0 FROM MST_TEST TEST
INNER JOIN TEMP_TEST TMP
ON TEST.IMP_TEST_DTL_NO = TMP.IMP_TEST_DTL_NO
FOR UPDATE NOWAIT;

UPDATE MST_TEST SET
TAISHO_DATA_MNT_FLG = 1
WHERE IMP_TEST_DTL_NO IN (SELECT * FROM TEMP_TEST);
DROP TABLE TEMP_TEST;

WSH重要オブジェクト一覧

WScript
WSHのルートオブジェクト。ホスト情報、スクリプトへの引数情報をはじめ、オブジェクトの生成や破棄などの役割を提供

WshArguments
スクリプトに渡された引数情報にアクセスする手段を提供

WshController
リモートコンピュータにあるスクリプトを実行するための機能を提供

WshEnvironment
システム環境変数にアクセスする手段を提供

WshNetwork
共有プリンタ/共有ドライブへのアクセス手段を提供

WshShell
アプリケーションの実行からレジストリへのアクセス、ショートカット作成など、Windowsシェルに関わるさまざまな機能へのアクセス手段を提供

WshShortcut
ショートカットを操作するための手段を提供

WshSpecialFolders
特殊フォルダへのアクセス手段を提供

WshUrlShortcut
インターネットリソースへのショートカットを操作するための手段を提供

FileSystemObject
ファイルシステムへのアクセスからテキストファイルへの読み書きの手段を提供

VBAーExcelAddOnの活用

ExcelのVBAではいろんなことをできるが、複雑な処理をやると、スピードが遅い、必要なライブが不足など、不便が出てきた。

ExcelAddOn経由で、.netFrameworkにより作ったライブを簡単に利用できるのはとっても便利でした。

ExcelよりOracle Clientをインストールせずに、OracleDBを接続して、SQLを実行させます。

C#の宣言部分
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
using ExcelDna.Integration;
using Oracle.ManagedDataAccess.Client;
using System;
using System.Collections.Generic;
using System.Data;
using System.Data.Common;

namespace XlsWxg
{
public class OraXE
{
[ExcelFunction(Category = "Database", Description = "Select By SQL, Return Data Arrays.")]
public static string Batch([ExcelArgument(Description = "select cols from tables where ...", Name = "sql")]string batchSQL, string dataSource)
{
List<string> lstValue = new List<string>();
try
{
using (var con = new OracleConnection(dataSource))
{
con.Open();
DbTransaction transaction = con.BeginTransaction();

　　　　 //一括で受取ったSQLを；より切出す
string[] sqls = batchSQL.Split(";".ToCharArray());
foreach (var sql in sqls)
{
　　　　　　 //SELECT文の場合、
if (sql.Trim().StartsWith("SELECT", StringComparison.OrdinalIgnoreCase))
{
DataTable dt = new DataTable();
using (var adapter = new OracleDataAdapter(sql, con))
{
adapter.Fill(dt);
}
lstValue.Add(DataTabletoString(dt));
}
else if (string.IsNullOrWhiteSpace(sql))
{
//処理なし
}
　　　　　　 //INSERT/UPDATE/DELETE文の場合、
else
{
using (var cmd = new OracleCommand(sql, con))
{
int count = cmd.ExecuteNonQuery();
lstValue.Add(count.ToString());
}
}
}
transaction.Commit();
}
}
catch (Exception ex)
{
IOWxg.Log(ex.Message);
return "error:" + ex.Message;
}
return string.Join(";", lstValue);
}
　 //EXCELにDataTableを直接受け取れないため、Stringに変更しておこう、
private static string DataTabletoString(DataTable dt)
{
　　　 //列名
string header = string.Join("|", dt.Columns.OfType<DataColumn>().Select(x => x.ColumnName));
List<string> lstTable = new List<string>();
foreach (DataRow row in dt.Rows)
{
List<string> lstRow = new List<string>();
lstRow.Clear();
foreach (DataColumn col in dt.Columns)
{
if (!row.IsNull(col))
{
lstRow.Add(row[col].ToString());
}
else
{
lstRow.Add(string.Empty);
}
}
　　　　 //行データ
lstTable.Add(string.Join("|", lstRow));
}
string datas = string.Join(Environment.NewLine, lstTable);
　　　 //列情報とデータ行を改行で区切り
return header + Environment.NewLine + datas;
}

}

}
ソース格納のgithub:https://github.com/lqwangxg/Xlsw.git
Excel4OracleDB.xlsmのgithub:https://github.com/lqwangxg/XlsWxg

VBA And WSH(Windows Script Shell)

'VBAよりソート機能付きリストを利用
Dim sortlist as object
sortlist = CreateObject("System.Collections.SortedList")
sortlist.add "abc"
sortlist.add "a1"
sortlist.add "b1"

Dim item
For Each item in sortlist
debug.print item
Next

'========================
a1
abc
b1