2012年06月29日

今日したことのメモ

ASP.NET Webサーバ構築

※Win2003 R2 + .NET Framework 4.0がインストールされている状態で作業開始

1.IISインストール
Webサーバのブラウザでは「http://localhost/」で確認できたが
他PCのブラウザからは接続不可

2.WindowsファイヤウォールでHTTPポートを許可
他PCのブラウザからも接続OK

3.IISマネージャにてASP.NETサイト追加
※規定のWebサイトは停止させておく

4.ASP.NETサイトに仮想ディレクトリ新規作成し、対象Webシステムを登録
ブラウザより登録したWebシステムを表示しようとすると
HTTP404エラー

5.IISマネージャのWebサービス拡張に
ASP.NET v4.0.30319を追加し許可
(対象Webシステムは.NET Framewrk 4.0使用)


ブラウザにてWebシステムが正常に表示された



posted by けいちゃん at 19:37| 長崎 ☁| Comment(0) | TrackBack(0) | IT関連備忘録 | このブログの読者になる | 更新情報をチェックする

2010年11月05日

Vista/Windows7のフォルダオプション

仕事でもプライベートでもWindowsXPを使っている私。

昨日、友達のPCで困っていたのを見ることになって。。

友達のPCはVistaでした

ちょっと隠しファイル表示/非表示を見たくなって

フォルダオプションを探したけど、ない。。もうやだ〜(悲しい顔)

(XPはエクスプローラのメニューにあるのに)


後で調べてみたら、、

VistaとWindows7は、

コントロールパネル−デスクトップのカスタマイズ

にフォルダオプションがありました。


そのうち、Windows7 使わないといけなくなると思うけど
(それか、また新しいのでるかな?)

きっと、使いこなしきれないわ〜ふらふら


posted by けいちゃん at 12:47| 長崎 | Comment(2) | TrackBack(0) | IT関連備忘録 | このブログの読者になる | 更新情報をチェックする

2010年07月29日

【VB.NET】ADO経由でExcelシート名取得

ADO経由でOpenSchemaメソッドにてExcelシート名取得

※OpenSchemaメソッドは、データソース構造 (メタデータ)を取得する
 メソッドです。


<サンプルソース>

Dim objADO As Object
Dim objRs As Object
Dim shName As String
Dim chk As String

objADO = CreateObject("ADODB.Connection")
objADO.Open("Driver={Microsoft Excel Driver (*.xls)}; " & _
      "DBQ=D:\test.xls;" & _
      "ReadOnly=0")
objRs = objADO.OpenSchema(20)
Do Until objRs.EOF
  If objRs Is Nothing Then Exit Do

  shName = objRs.Fields("TABLE_NAME").Value
  chk = shName.Substring(shName.Length - 1, 1)
  If chk = "$" Or chk = "'" Then
    'shNameにシート名セット
    shName = shName.Substring(0, shName.Length - 1)
  End If

  objRs.MoveNext()
Loop

objRs.Close()
objRs = Nothing
objADO.Close()
objADO = Nothing


※但し、この方法で取得すると、Excel上のシート順では
 取得できません。

 Excel上のシート順で取得する方法をご存知の方、
 教えてください!

ラベル:VB.NET EXCEL
posted by けいちゃん at 09:34| 長崎 ☀| Comment(18) | TrackBack(0) | IT関連備忘録 | このブログの読者になる | 更新情報をチェックする
×

この広告は180日以上新しい記事の投稿がないブログに表示されております。