SE-TOMMYのプロフィール
- ベストアンサー数
- 17
- ベストアンサー率
- 77%
- お礼率
- 100%
さすらいのSE(システムエンジニア)です。 現在は独立して中小企業さんのITサポート、関連ソリューションを行っております。
- 登録日2007/03/31
- VB.netで自作プログラムがウイルスと誤認識
されます。 何が原因かさっぱり判りません。 もし知っている方がいれば教えてください。 ※ちなみにVisual Basic 2008 Express Editionを使用しています。
- 締切済み
- Visual Basic
- beegee
- 回答数2
- ASP.NET 2.0(VB)からEXCELオブジェクトを起動・操作し
ASP.NET 2.0(VB)からEXCELオブジェクトを起動・操作し、クライアントにDLさせる仕組みを実装しようとしています。 DCOMコンポーネントにASP.NETユーザーを権限追加し、以下のコードでDLさせることはできたのですが、イベント発行からDLボックスが表示されるまでのレスポンスが60秒掛かってしまっています。 サーバーのタスクを監視してると (1)でEXCELプロセス起動までは、1~2秒後 (2)でファイル作成されるのが、60~70秒後 DCOMによるオートメーションではこんなに時間掛かるものなのでしょうか? デバッグ環境(XP)では、数秒で動作できているので オートメーション、もしくはActiveDirectoryに因果しているのかと思っています。 レスポンスを早くするなにか解決策などありましたらご教授願います。 また、以下のコードではリソースが解放されずにリークが発生してしまっています。 こちらもなにか解決案ありましたらよろしくお願いします。 [サーバー環境] OS:Server 2003、IIS:6.0、Excel 2002 Protected Sub Button_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button.Click Dim objExApp As Excel.Application objExApp=Server.CreateObject("Excel.Application") '<----(1) objExApp.Application.DisplayAlerts=False Dim objExBooks As Excel.Workbooks objExBooks=objExApp.Workbooks Dim objExBook As Excel.Workbook objExBook=objExBooks.Add Dim objExSheets As Excel.Sheets objExSheets=objExBook.Sheets Dim objExSheet As Excel.Worksheet objExSheet=objExSheets(1) Dim objExCell As Excel.Range objExCell=objExSheet.Cells objExCell(1, 1)="EXCEL操作" objExBook.SaveAs(Server.MapPath("ファイル名")) '<----(2) If Not objExCell Is Nothing Then System.Runtime.InteropServices.Marshal.ReleaseComObject(objExCell) objExCell=Nothing End If If Not objExSheet Is Nothing Then System.Runtime.InteropServices.Marshal.ReleaseComObject(objExSheet) objExSheet=Nothing End If If Not objExSheets Is Nothing Then System.Runtime.InteropServices.Marshal.ReleaseComObject(objExSheets) objExSheets=Nothing End If If Not objExBook Is Nothing Then objExBook.Close() System.Runtime.InteropServices.Marshal.ReleaseComObject(objExBook) objExBook=Nothing End If If Not objExBooks Is Nothing Then System.Runtime.InteropServices.Marshal.ReleaseComObject(objExBooks) objExBooks=Nothing End If If Not objExApp Is Nothing Then objExApp.Quit() System.Runtime.InteropServices.Marshal.ReleaseComObject(objExApp) objExApp=Nothing End If GC.Collect() System.Windows.Forms.Application.DoEvents() Response.Redirect("ページ名") End Sub
- ベストアンサー
- Microsoft ASP
- ekko1983
- 回答数1
- 阪神時代の井川慶投手は、中日を苦手にしてましたか?阪神時代、井川慶投手
阪神時代の井川慶投手は、中日を苦手にしてましたか?阪神時代、井川慶投手は、広島、ヤクルト、巨人、横浜には、通算で勝ち越ししてると思うのですが、中日を苦手にしてましたか?
- ベストアンサー
- 野球
- noname#122128
- 回答数1
- 顧客ネットワークで接続がタイムアウト(?)してしまいます
顧客ネットワークで接続がタイムアウト(?)してしまいます 初めて質問させていただきます。 VisualStudio2008でwebアプリを制作している者なのですが、 不具合の原因がどうにもわからないのでお知恵を拝借したく書き込みました。 自社ネットワーク内では正常に動作したにも関わらず、 顧客ネットワークで動作試験を行ったところ正常動作しませんでした。 具体的には... 環境 Windows Server 2008 R2 + IIS 正常な動作 ・webアプリにアクセスし、同じ画面(test.aspx)で20分間以上放置した後 ポストバックが発生する操作を行うと、セッション(ログイン情報)を破棄し ログインページ(login.aspx)に戻る 顧客先で発生した現象 ・サーバー上では正常に動作する ・test.aspxで3~10分放置後ポストバックが発生する操作を行うと、 "Internet Explorer ではこのページは表示できません"という画面になる ・その後、ページの更新をするとtest.aspxを表示する ・タイマーを仕掛けて1分毎にサーバーと通信させると上記の現象は発生しないが、 IISログに以下が不定期に出力されている 192.168.100.17 8/20/2010 12:27:18 W3SVC1 APPSV 192.168.100.235 21321 8732 0 200 121 POST /test/test.aspx id=5 自社ネットワークでは正常に動作するので、 顧客ネットワークが原因なのでは...と考えています。 同じような症状がないかと調べてはみたのですが、解決する方法を見つける事ができず... 解決方法をご存知の方がいらっしゃいましたら、是非ご教授下さい。 宜しくお願いいたします。
- ベストアンサー
- Microsoft ASP
- feelwell1223
- 回答数1
- C#でネットワーク(LAN)上のPCの時刻を取得する方法はありますでし
C#でネットワーク(LAN)上のPCの時刻を取得する方法はありますでしょうか? DOSコマンドならnet time が該当しますが、プログラムでそのような方法はあるのでしょうか?
- ベストアンサー
- Microsoft ASP
- ENTRE
- 回答数1