テキスト広告:プレミアムプランが最初の3か月月額99円!【2025年7月31日まで】

AdMax右サイドバー広告

月曜日, 7月 14, 2025

広告

Amazon

【続AdSense 審査編】AI(ChatGPT)の助けを借りてブログ更新を再開してみた!

 ■質問(ChatGPTへの質問内容とは一部異なることがあります)

今までの内容をブログ用にまとめてください。


了解しました!
これまでのやり取りをもとに、「AIと自分の体験を織り交ぜてブログを更新し、AdSense審査を目指す」方向で記事本文をBlogger用ブログ記事形式にまとめます👇


【ブログ再始動】AIと一緒に情報発信!AdSense合格を目指して

こんにちは、当ブログにご訪問ありがとうございます。
このたび、ブログの更新をAIの力も活用しながら再始動することにしました!


🎯 目標は「AdSense合格」

まず目指すのは、Google AdSense の審査に通過すること。
収益を目的にしているわけではないですが、「きちんと価値のあるブログである」とGoogleから認められるのは一つのモチベーションになります。


🤖 AI(ChatGPT)の力を借りてみる

最近話題のAI、ChatGPTやCopilotを活用すれば、

  • 作業の効率アップ

  • コードや設定手順の下書き支援

  • アイデア出しやタイトル生成
    といったところで非常に役立ちます。

ただし、そのままコピペではAdSense審査には通りません。

そこで私は、以下のような構成で記事をつくっています。


✍️ ブログ構成の基本ルール(AI+自分)

記事はこんなふうに構成していきます:

  1. AIが提案した技術手順の紹介

  2. 自分で試してみた体験・トラブル・工夫点

  3. 最終的にまとめた実用的な手順やコード

つまり、**AIの知見を活かしつつ、自分なりの体験や学びを織り交ぜた“実用ノート”**として発信していく方針です。


📄 AdSense審査に向けた準備リスト

私自身がChatGPTと一緒に調べて整理した「審査通過のために必要なこと」は以下の通りです👇

項目内容
✅ 独自ドメインの導入blogspot.comでは通りにくいため、独自ドメインを設定
✅ 固定ページプライバシーポリシー / お問い合わせ / プロフィールなどを設置
✅ コンテンツ数記事数5〜10本以上、1記事1,000文字前後
✅ コンテンツ内容読者に有用なオリジナル情報(AIだけでなく自分の体験を含む)
✅ 構成導入 → 手順 → 注意点 → まとめ など、整理された構成
✅ ナビゲーションメニューやカテゴリ整理、内部リンクの工夫
✅ 見た目モバイルでも読みやすく、表示速度も意識
✅ 審査中は広告なしアフィリエイトや外部広告は外しておく

🏷 タグ・カテゴリも整備してみる

以下のようなラベル(タグ)で分類して、読みやすさと管理しやすさを両立させています:

  • AI活用

  • 実践レポート

  • 手順解説

  • 自作コード

  • エラー対処

今後もこのスタイルで継続的に記事を更新していきます。


💬 最後に

ブログ運営はAIの力で効率化しつつも、「自分の視点」「リアルな体験」を加えることで、唯一無二の技術ノートになると思っています。

これからも技術的なトピック(設定方法、ツールの使い方、エラー対処など)を中心に、人に役立つ情報をわかりやすく届けられるブログを目指していきます。

今後ともよろしくお願いします!


🔔 次回予告

次回は「【実例あり】Bloggerに独自ドメインを設定してAdSense審査に備える方法」を予定しています。お楽しみに!


必要ならHTML形式でも書き出せるし、Bloggerにそのまま貼れるよう整形もできますよ◎
また次の記事ネタも一緒に考えるなら、気軽に声かけてくださいね!


ここまでは、ChatGPTからのコピペです。

土曜日, 7月 05, 2025

【AdSense 審査編】AI(ChatGPT)の助けを借りてブログ更新を再開してみた!

 ■質問(ChatGPTへの質問内容とは一部異なることがあります)

https://itpro-blogger.blogspot.com/ このブログをAdSenseの審査を通るように

したいんだけど、、どうしたらよい?


AdSense 審査を初めて通すには、しっかりとした準備と高品質なコンテンツ作りが

不可欠です。以下は、参考リンクをもとにまとめた、ブログ(特に日本語の

 Blogger=Blogspot)で合格率を上げるための対策です。


✅ 基本条件(必ずクリアしておくべきポイント)

1.独自ドメインを使用する

 Blogspot の無料サブドメイン(xxx.blogspot.com)では、初回の審査は原則通りません。

独自ドメインに変更してから申請してください。


2.最低限必要な固定ページを設置する

 – プライバシーポリシー

 – お問い合わせページ(フォーム)

 – 運営者情報(プロフィール)

これらがあることで「信頼できるサイト」と判断されやすくなります。


3.アドセンスポリシーに違反していないこと

 著作権侵害、成人向け、過度なアフィリエイトなどは禁止コンテンツに該当しない

よう注意しましょう。


✍️ コンテンツ品質と量の強化(重要)

4.記事数と文字数

 少なくとも 5〜9本の記事(できれば20本以上)、1記事につき 800〜1,000字以上 を

目安としてください。


5.独自性と有用性

 他サイトのコピーではなく、自分の経験や視点を盛り込んだオリジナルの記事に

しましょう。読者の悩みや疑問を解決できる内容であることが重要です。


6.タイトルの最適化

 何についての記事か一目で分かる明快なタイトル(キーワードを含む)をつけることで、

記事が評価されやすくなります。


🛠 サイト設計とユーザー体験を整える

7.読みやすく・操作しやすいサイトにする

 ナビゲーション(メニュー)、カテゴリ分け、モバイル対応、パンくずリスト、目次など

を整備。特にトップページをサイト型トップページにして魅力的にすると効果的です。


8.ページ読み込み速度の最適化

 画像圧縮、不要なプラグインの削除、レスポンシブ設計などで表示速度を高めましょう。

ユーザー体験(UX)はAdSense審査でも重要です。


🔄 再申請時の戦略とチェック

9.審査に落ちた理由を確認する

 審査メールに「有用性の低いコンテンツ」や「ポリシー違反」といった文言が含まれて

いる場合、それに応じて対策を練りましょう。


10.審査中はアフィリエイトリンクや広告を外す

 合格前は広告やアフィリエイトでページが広告まみれに見えないよう、控えた方が無難です。


11.定期的に再申請して粘る

 改善を加えた後は再申請。審査期間は通常1日~1週間ですが、状態により数週間かかる

場合もあります。


📋 チェックリスト

項目                  内容

独自ドメイン            必ず導入している

固定ページ                    プライバシーポリシー、問い合わせ、プロフィールあり

記事数・文字数             5~9本以上、1,000字程度/記事

独自コンテンツ             自身の体験・ユニークな視点

タイトル                          分かりやすく、内容が想像できる

ナビゲーション構造    カテゴリ、目次、サイト型トップページなど

モバイル最適化             スマホ表示の整備と高速化

審査中の広告                  外す(アフィリリンク含む)

再申請の準備                  メール内容分析と改善実施後、再申請


🛠 Blogspot からの移行も視野に

Blogspot(無料ブログ)での申請は困難なため、WordPress + レンタルサーバー+独自

ドメインに移行することをおすすめします。操作性・自由度ともに優れ、後々のサイト

運用でもメリットが大きいです。


✅ 最後に

AdSenseの審査基準は公開されていませんが、Googleが「信頼できる」「ユーザーに価値

を提供する」と判断できるサイトを作ることが最重要です。

記事の質、独自性、サイトの信頼性(コンテンツ・構造)、ポリシー準拠。


これら全てに抜かりなく手を入れて、再申請しましょう。合格を目指して応援しています。💪


ご自身でブログ内容や構成を相談したい場合にも、気軽にどうぞ!


ここまでは、ChatGPTからのコピペです。

木曜日, 10月 20, 2022

[Windows]Windows Live メール のアドレス帳から Thunderbird への移行方法

2013年11月から24時間稼働し続けてくれたPCが起動できなくなってしまった。
ハードディスク診断(ソニーツール)は問題なかったので、OSだけ壊れたようだ。
2022年9月9日に故障したので約9年間稼働し続けてくれたことになる。
ハードはまだ大丈夫そうなのでOSを再インストールすればまだまだいけそうだ!

いけそうだが、もうすでに新しいPCを買って開封するのを待っている状態だった
ので、開封して使ってみることにしたのだが・・・。

Windows 8 Pro 64ビット から Windows11 Pro(32bit版はこの世から消えた!!) に
切り替えることになったのだが、いろいろ変わりすぎて思考の仕様変更を余儀なくされた。
この世から消えたアプリがぁぁあ・・・!いきなり、Windows Live メール が使えない!!

メールに何を使えばいいかからつまずくことに・・・。
標準のメールソフトは入っているが使いずらくて、他を探すことになって
無料で使える条件では、あまり選択肢がないことがわかった。

無料で使えるメールソフトが Thunderbird しかなかった。
この時点で最新の Thunderbird 102.4.1 をインストールして使用することにした。
マイクロソフトに任せられないので少額だが寄付をすることにした。

■Windows Live メール のアドレス帳から Thunderbird への移行方法
1.画面左下の「アドレス帳」をクリックします。
2.アドレス帳画面が表示されるので、「エクスポート」をクリックして、「カンマ区切り (.CSV)」をクリックします。
3.「CSVのエクスポート」が表示されるので、「参照」をクリックします。
4.「名前を付けて保存」が表示されるので、任意のファイル名を入力して「保存」をクリックします。
5.「CSVのエクスポート」画面に戻るので、「次へ」をクリックします。
6.「エクスポートするフィールドを選択してください」ボックスが表示されるので、すべての項目をチェックします。
7.「完了」をクリックして終了です。

1.画面左のアイコンから「アドレス帳」をクリックします。
2.メニューから「インポート」をクリックします。
3.「カンマまたはタブ区切りのファイル(.csv、.tsv)」が選択されていることを確認し、「次へ」をクリックします。
4.インポートファイルを選択し、「開く」をクリックします。
5.「項目名の割り当て」が表示されるので、すべての項目をチェックし、「次へ」をクリックします。
6.「選んだデータのインポート先を選択してください」が表示されるので、「個人用アドレス帳」または新しい
ディレクトリ作成を選択し、「次へ」をクリックします。
7.「インポート開始」をクリックして終了です。

火曜日, 6月 23, 2020

[VB.NET]マイグレーションの実行で「タイプ初期化子が例外をスローしました。」のエラーになる。

▼質問
VB2005からVB2012にマイグレーションしてコンパイルが通ったのに
初期実行時に下記のエラーが発生してデバックが途中で停止してしまうんだ。

「XXXXXXのタイプ初期化子が例外をスローしました。」

次の対応をすれば問題なく動くようにはなったが・・・。
①「対象のCPU」の対応方法
 ソリューションのプロパティ→「コンパイル」→「対象のCPU」→「x86」を選択する。
②「32ビットの優先」の対応方法
 ソリューションのプロパティ「コンパイル」→「32ビットの優先」にチェックを入れる。

▼回答
将来の事を考えたらどのような対応をしたらよいのか?!

32ビットから64ビット対応にできるか調査して対応するのが良さそうだ。

変数のサイズぐらいは、再度チェックする必要だけはありそうだ。。。。

月曜日, 7月 08, 2019

[Windows]GCCとMAKEファイル実行環境構築方法

1.GCC実行環境

■コンパイラ
MinGW "Minimalist GNU for Windows"
■公式サイト
http://www.mingw.org/

①インストール
・MinGWから[mingw-get-setup.exe]をダウンロードします。
・ダウンロードしたEXEをクリックして[Install]→[Continue]の
 順でクリックします。
・[MinGW Installation Manager]から下記の項目を右クリック
 して[Mark for Installation]を選択します。

 mingw32-base-bin
 mingw32-gcc-g++-bin

・ツールバーから下記の順にクリックしてインストールは終了です。

 [Installtion]→[Apply Changes]→[Apply]→[Close]

②PATHの設定
・システムの詳細設定の環境設定から[Path]に下記パスを設定します。

 C:\MinGW\bin

②GCCの確認
・コマンドプロンプトから[gcc -v]と入力します。
・下記の内容が表示されればインストール完了です。

 ~いろんな情報~
 gcc version x.x.x (MinGW.org GCC-x.x.x-x)

2.MAKE実行環境

■パッケージ名
GnuWin32 GNU Make 3.81 "Make for Windows"
■公式サイト
http://gnuwin32.sourceforge.net/
■ダウンロードサイト
http://gnuwin32.sourceforge.net/packages/make.htm

①インストール
・公式サイトからインストーラを下記の手順で[make-3.81.exe]をダウンロードします。

 [Download Packages]→[Make]→[Complete package, except sources Setup]

・ダウンロードしたEXEをクリックして対話ウィンドウに従いセットアップします。

②PATHの設定
・システムの詳細設定の環境設定から[Path]に下記パスを設定します。

 C:\Program Files (x86)\GnuWin32\bin

③MAKEの確認
・コマンドプロンプトから[make -v]と入力します。
・下記の内容が表示されればインストール完了です。

 GNU Make x.xx
 ~いろんな情報~
 This program built for i386-pc-mingw32

日曜日, 6月 09, 2019

[ORACLE]管理対象ドライバODP.NET(ManagedDataAccess)の移行方法

・管理対象ドライバODP.NET(ManagedDataAccess)の移行方法

 1.移行に関する概要

  これまでODP.NETのドライバには、Oracle.DataAccess.dll(管理対象外ドライバ)を使用して
 きましたが、Oracle 12cから導入されたクライアントソフトの設定が不要のODP.NET管理対象
 ドライバがあります。
 このドライバは、クライアント等にInstant ClientやODACを登録する必要がないことが特徴です。
 Oracle.ManagedDataAccess.dllを同梱してConfigファイルを構成するだけでOracle Database
 に接続可能となります。

 2.システム要件

 ・32ビットOS:Windows 7、Windows Server 2008、Windows 8
 ・64ビットOS:Windows 7、Windows Server 2008、Windows 8、Windows Server 2012
 ・Oracle Database 10gリリース2以降のデータベースにアクセスするアプリケーション
 ・Microsoft .NET Framework 4.0以降を対象フレームワークにするアプリケーション
  ・詳細は下記サイトを参照ください。
  https://docs.oracle.com/cd/E57425_01/121/ODPNT/InstallSystemRequirements.htm

 3.クラス・デリゲートサポート比較

 ・Oracle.DataAccess.*とOracle.ManagedDataAccess.*のサポート状況は下記サイト
 を参考にしてください。
  https://docs.oracle.com/cd/E57425_01/121/ODPNT/intro003.htm#BHCFHCAF

 3.参考サイト

 ・Oracle Data Provider for .NET開発者ガイド 12c リリース1 (12.1)
  https://docs.oracle.com/cd/E57425_01/121/ODPNT/toc.htm

 3.移行方法

 ①.NETプロジェクトの参照設定を「Oracle.DataAccess.dll」から
 「Oracle.ManagedDataAccess.dll」に変更します。

 ②ネームスペース参照を変更します。
  C#:using ディレクティブ、VB:Imports ステートメント
    // C#
    using Oracle.ManagedDataAccess.Client;
    using Oracle.ManagedDataAccess.Types;

    ' VB
    Imports Oracle.ManagedDataAccess.Client
    Imports Oracle.ManagedDataAccess.Types

  ③アプリケーション構成ファイル「app.config」にドライバ情報を記述します。
  tnsnames.oraをexeファイルと同じフォルダに置くことでも実現できます。

  下記の例は、対象フレームワーク「Microsoft .NET Framework 4.0」
  Oracle.ManagedDataAccessドライバのバージョンが「4.121」です。

    <configSections>
    <section name="oracle.manageddataaccess.client"
      type="OracleInternal.Common.ODPMSectionHandler, Oracle.ManagedDataAccess, Version=4.121.2.0, Culture=neutral, PublicKeyToken=89b483f429c47342"/>
    </configSections>
    <startup>
        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.0"/>
    </startup>
    <system.data>
        <DbProviderFactories>
            <remove invariant="Oracle.ManagedDataAccess.Client"/>
            <add name="ODP.NET, Managed Driver" invariant="Oracle.ManagedDataAccess.Client" description="Oracle Data Provider for .NET, Managed Driver"
                type="Oracle.ManagedDataAccess.Client.OracleClientFactory, Oracle.ManagedDataAccess, Version=4.121.2.0, Culture=neutral, PublicKeyToken=89b483f429c47342"/>
        </DbProviderFactories>
    </system.data>
    <runtime>
        <assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
            <dependentAssembly>
                <publisherPolicy apply="no"/>
                <assemblyIdentity name="Oracle.ManagedDataAccess" publicKeyToken="89b483f429c47342" culture="neutral"/>
                <bindingRedirect oldVersion="4.121.0.0 - 4.65535.65535.65535" newVersion="4.121.2.0"/>
            </dependentAssembly>
        </assemblyBinding>
    </runtime>
    <oracle.manageddataaccess.client>
    <version number="*">
      <dataSources>
        <dataSource alias="ネットサービス名(TNS名)" descriptor="(DESCRIPTION=(ADDRESS=(PROTOCOL=tcp)(HOST=ホスト名 or IPアドレス)(PORT=1521))(CONNECT_DATA=(SERVICE_NAME=サービス名))) " />
      </dataSources>
    </version>
    </oracle.manageddataaccess.client>

日曜日, 9月 06, 2015

[C#]DLLからApp.configのAppSettingsの内容が読み込めない

▼質問
DLLでApp.configを作成してAppSettingsにAddを追加したけど

その内容が読み込めないだけど・・・何でだ!

▼回答
次のようにすれば読むことができるよ!!

System.Configuration.Configuration config = System.Configuration.ConfigurationManager.OpenExeConfiguration(this.GetType().Module.Name);
string value = System.Configuration.ConfigurationManager.AppSettings["key"];

■関連サイト

月曜日, 3月 09, 2015

[C#]namespaceの上にコメント書くと「warning CS1587: XML コメントが有効な言語要素の中にありません。」の警告が・・・

▼質問
namespaceの上にコメント(<summary>)書くと

「warning CS1587: XML コメントが有効な言語要素の中にありません。」

の警告がでる。

▼回答
簡単な方法は、NamespaceDocクラスを作成することだ!

するとNamespaceのXmlドキュメントコメントが作成できる。

namespace 名前空間
{
    /// <summary> 概要</summary>
    /// <remarks>解説</remarks>
    [System.Runtime.CompilerServices.CompilerGeneratedAttribute]
    internal class NamespaceDoc
    {
    }

}

木曜日, 5月 10, 2012

[Java]IE8で改行したラベル・ボタン(HTMLテキスト使用したもの)が消える


▼質問
アプレット(JApplet)で作成した画面なんだけど・・・。
IE6で正常だった改行したラベル・ボタン(HTMLテキスト使用したもの)がIE8で表示すると
消える時(ブラウザのリロード等・・・)があるんだ!どうしてそうなるか教えてくれ!!

例:
JLabel label1 = new JLabel( "<HTML><FONT><P ALIGN=CENTER>改 行<BR>ラベル</P></FONT></HTML>" );

▼回答
根本的解決ではないがバグ報告で回避方法が載っているから参考にしてくれ!

Bug ID: 7001786 JLabel does not display html text after browser refresh

Bug ID: 6993691 JEditorPane throws NullPointerException when reloaded

アプレットのinit()とstart()に次のコードを入れてみてくれ!!

new javax.swing.text.html.parser.ParserDelegator();

それでは、健闘を祈る(笑

・・・。

■関連サイト
JButtonの改行したラベルがリロードで消える

金曜日, 12月 09, 2011

[Eclipse]Eclipseのホバー(ポップアップ説明表示)の日本語化

▼質問
EclipseでJavaAPIなどにカーソルを置いた時にでるポップアップして表示する解説表示(ホバー)を
日本語したいのだがどうすればできるのか教えてくれ!

▼回答
1.Java関連の日本語APIドキュメントを入手する。
http://download.java.net/jdk/jdk-api-localizations/jdk-api-ja/builds/latest/zip/jdk-6-doc-ja-ea.zip
jdk-6u21-docs-ja.zip2.MergeDocを入手して日本語版のzipを作成する。
http://mergedoc.sourceforge.jp/#mergedoc.html
3.Eclipseの[ウィンドウ]→[設定]→[Java]→[インストール済みのJRE]の設定を変更する。

■関連サイト
【Java 5版MergeDocでEclipse 3.2のホバーを日本語化 - @IT】
【jdk-6-doc-ja.zip がダウンロードできない~~。って人のために - 雑想空間】

木曜日, 3月 10, 2011

[VB.NET]APIのFindWindowをフレームワーク(.NET Framework)に変更するには?

▼質問
VB.NETでWin32APIのFindWindowを次の様にコーディングしているんだが・・・。



Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
(ByVal lpClassName As String, ByVal lpWindowName As String) As Integer

Public Function GetWindowName(ByVal WindowName As String) As String

Try

If (FindWindow(vbNullString, WindowName) <> 0) Then
Return WindowName
End If

Catch ex As Exception

End Try

Return Nothing
End Function



これを.NET Frameworkに変更するには、どうしたらよいか教えてくれ!

▼回答
.NET FrameworkにあるProcessクラスを使えば実現できるよ!

参考にそのコードを次に示しておくよ!!


Public Function GetWindowName(ByVal WindowName As String, ByVal ProcessesName As String) As String

Try

Dim localByName As Process() = Process.GetProcessesByName(ProcessesName)

For i As Integer = 0 To localByName.Length - 1
If (localByName(i).MainWindowTitle.ToUpper = WindowName.ToUpper) Then
Return WindowName
End If
Next i

Catch ex As Exception

End Try

Return Nothing
End Function

金曜日, 2月 18, 2011

[ORACLE]VBで9iと10gの混在はできない。

▼質問
VBで作った9iで動いているoo4o接続のアプリケーション環境に

10gで動いているアプリケーションを入れようとしたんだが

うまく動かないんだ。

どうしたら良いか教えてくれ!

▼回答
oo4oは、クライアントに複数のバージョンをインストールできても

混在して使うことはできないんだ。

だから、アプリケーション側がoo4o接続のバージョンを統一する

必要があるんだ。

(oo4oを1つのクライアントに複数バージョンインストールすることは
出来ませんので、新規に新たなOracle Clientをインストールする場合に、
既にインストールされているoo4oを削除する必要があります。)


■参考サイト
OTN Japan - 意外と簡単!? .NETでOracle:スマートクライアント編

既存バージョンからのアップグレード注意点

oo4oは、一台のクライアントに対して、一つのORACLE_HOMEのみ対応します。すなわち、
1台で使用できるバージョンは1つのみで複数バージョンは使用できません。
また、Oracle Database 10gからは、新たなORACLE_HOMEにoo4oをインストールすると、
レジストリが書き換えられ、それ以前にインストールされたoo4oバージョンは使用できません
のでご注意ください。

注意:Oracle Database 10gより前のoo4oのバージョンを導入する際には、一度既存のoo4oを
削除した上で、再度インストールすることが必要になります。

再コンパイルが必要な場合

アーリー・バインディングを使用している場合のコードは以下のようになります。

Dim OraSession As New OraSessionClass
Dim OraDatabase As OraDatabase
Set OraDatabase = OraSession.OpenDatabase("orcl", _
 "scott/tiger", dbOption.ORADB_DEFAULT) <アーリー・バインディングを使用した場合のコード>

参照設定を行わずにoo4oを使用している場合(レイト・バインディング)のコードは以下のようになります。

Dim OraSession As Object       ''セッション・オブジェクト
Dim OraDatabase As Object      ''データベース・オブジェクト
Set OraSession = CreateObject("OracleInProcServer.XOraSession")
Set OraDatabase = OraSession.OpenDatabase("orcl", "scott/tiger", 0&)<参照設定を行わずにoo4oを使用しているコード(レイト・バインディング)>

レイト・バインディングを使用してコンパイルされたモジュールは、再コンパイルせずに動作可能ですが、
確実に移行作業を行うために、再コンパイルしていただくことを推奨しております。



oracle9iとoracle10gのクライアントの併用について - Yahoo!知恵袋

日曜日, 1月 23, 2011

[VBA]ScrollAreaで「アプリケーション定義またはオブジェクト定義のエラーです。」のエラーがでる

▼質問
ScrollAreaのバックアップを取ってそれを戻すときに次のエラーが出る。



Dim strScrollArea As String

With Worksheets("Sheet1")
strScrollArea = .ScrollArea
.ScrollArea = ""
'次の処理でエラーが出る
.ScrollArea = strScrollArea
End With



「アプリケーション定義またはオブジェクト定義のエラーです。」

どうしてなんだ。

▼回答
理由は、A1形式の時しか使えないからなんだ。

だから、次の様にA1形式にしてからバックアップを取って戻す必要があるんだ。



Dim strScrollArea As String
Dim lngStyle As Long

With Worksheets("Sheet1")
lngStyle = Application.ReferenceStyle
Application.ReferenceStyle = xlA1
strScrollArea = .ScrollArea
.ScrollArea = ""
'処理
.ScrollArea = strScrollArea
Application.ReferenceStyle = lngStyle
End With



注意として、前回の形式が変わらない様にApplication.ReferenceStyleの

バックアップも必要だね!

木曜日, 12月 16, 2010

[VB.NET]ファイル名に使用できない文字チェック(GetInvalidFileNameChars)

▼質問
VB.NETのメソッドでファイル名に使用できない文字を簡単に

チェックできるメソッドってないの?

▼回答
直接チェックできるメソッドはないけど次のメソッドを使えば

ファイル名に使用できない文字を簡単に取得できるよ。

System.IO.Path.GetInvalidFileNameChars

このメソッドを使ったチェック関数を作ったから

次のコードを参考にしてくれ!



Public Function IsInvalidFileNameChars(ByVal fileName As String) As Boolean

Try
For Each invalidChar As Char In System.IO.Path.GetInvalidFileNameChars
If (fileName.IndexOf(invalidChar) > -1) Then
Return True
End If
Next
Catch ex As Exception
End Try

Return False
End Function



■参考サイト
20.ファイル名に使用できない文字を含んでいるかチェックする < ファイル操作 Tips メニュー < C# 2005 Tips HOME < HIRO's.NET

月曜日, 10月 18, 2010

Jet EngineのキャッシュとDBEngine.Idle dbRefreshCache

Jet Engineのキャッシュとその制御

非同期(トランザクションなし)の場合、実際に書き込み動作が始まるのは、[1] Write Cacheが、レジストリのMaxBufferSizeに指定したサイズを超えたとき、もしくは、[2] 最後の書込み動作以降にFlushTransactionTimeoutに設定された時間が経過したときであり、このうちどちらか短い方の条件が成立したときになります。

マルチユーザー環境などで、書き込み遅延が発生しては困るときには、同期書き込みを利用します。同期書き込みを行なうには、BeginTrans ~ CommitTransという、明示的なトランザクションを利用します。CommitTransを実行すると、遅延なしにディスクに書き込みが行なわれます。トランザクションは、DAOではWorkspaceの、ADOではConnectionのメソッドです。

gridview の更新が出来ない。

ACC2000: DBEngine.Idle dbRefreshCache の最新の情報に更新がないイミディエイト

日曜日, 9月 26, 2010

[VB.NET]Browsable(False)ではプロパティウィンドウから「GenerateMember」「Locked」「Modifiers」が非表示にできない

▼質問
BrowsableAttributeクラスの属性を使ってユーザーコントロールのプロパティを

[プロパティ]ウィンドウから非表示にしたいんだ。

だけど、次のプロパティは非表示にできなかったんだ。

「GenerateMember」「Locked」「Modifiers」

良い方法があったら教えてくれ!

▼回答
次のコードを使うと実現できるから参考にしてくれ!!



Imports System.ComponentModel.Design
Imports System.ComponentModel

<Designer(GetType(SampleDesigner), GetType(IDesigner))> _
Public Class UserControl1

End Class
Public Class SampleDesigner
Inherits System.Windows.Forms.Design.ParentControlDesigner

Private _unneededProperties As String() = {"GenerateMember", "Locked", "Modifiers"}
Protected Overrides Sub PostFilterProperties(ByVal properties As IDictionary)
For Each prop As String In _unneededProperties
properties.Remove(prop)
MyBase.PostFilterProperties(properties)
Next
End Sub

End Class