2011年11月17日木曜日

EXCEL:COUNTA(値,値,・・・)

COUNTA(10,"abc",9,4)
⇒4 ( )内のデータの個数。

COUNTA(A1:A5)
⇒5 セル範囲A1からA6のデータの個数。

EXCEL:COUNTIF(範囲,検索条件)

COUNTIF(A1:D4,”合格”)
⇒9 指定した範囲内に合格の文字が9ヶ所ある。

COUNTIF(A1:D4,”>100”)
⇒10 指定した範囲内に100以上の数字が10個ある。

2011年2月21日月曜日

シェルスクリプト:postgresqlのSQL実行

/usr/local/pgsql/bin/psql -h localhost -U user test_db
SELECT * FROM test_table;
_EOF

2011年2月10日木曜日

シェルスクリプト:複数サーバのログをtailする

#!/bin/bash

FILE = $1

for box in box1.foo.com box2.foo.com box3.foo.com box4.foo.com; do

ssh $box tail -f $FILE &

done

wait

2010年11月20日土曜日

VBScript:HTTPファイルアップロードする

Option explicit
dim xmlhttp
dim strm
dim strUrl
dim strFile
dim strTgtFile

'ファイル送信用のスクリプト
strUrl = "http://192.168.1.210/put.php"
'送信ターゲット
strFile = "c:¥Windows¥System.ini" '送信ファイル名
'//strTgtFile = "aa/あいう.dat" '保存ファイル名
strTgtFile = "upload.dat"

set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP")
'これが一番いいと思われるが全ての環境で使えるわけではない setTimeOutが可能
'set xmlhttp = CreateObject("MSXML2.XMLHTTP")
'set xmlhttp = CreateObject("Microsoft.XMLHTTP")
'「msxml3.dll: エラーを特定できません」エラーとなる場合 Streamに対する制限
set strm = CreateObject("ADODB.Stream")
strm.Mode = 3 'for LoadFromFile
strm.Type = 1 'Binary
strm.Open
strm.LoadFromFile( strFile )
'このオプションは MSXML2.ServerXMLHTTPのみ
xmlhttp.setTimeouts 180 * 1000 , 180*1000 , 180*1000 , 180*1000

xmlhttp.open "PUT",strUrl 'PUTメソッドはダメな時はPOST
'xmlhttp.open "POST",strUrl
xmlhttp.setRequestHeader "cmd","put"
xmlhttp.setRequestHeader "hirake","goma"
xmlhttp.setRequestHeader "fname", strTgtFile

xmlhttp.send strm.read(-1)

strm.Close
'HTTPステータスを表示
WScript.Echo xmlhttp.status
'サーバからの応答を表示
WScript.Echo xmlhttp.responseText

set strm = Nothing
set xmlhttp = Nothing


http://blog.jojo.jp/?eid=1331836