AKARI0418 の回答履歴

Visual Basic 2008 Express Edition with Service Pack 1 をmicrosoftのホームページからインストールしたのですが、その中のMicrosoft SQL Server 2008 Express Edition(×86)がインストールできませんでした。と出ます。 それが原因か知りませんが、Visual Basic 2008から　ファイル→新しいプロジェクトと開いていってもＯＫの部分が灰色のままで押せません。　原因についてどなたか教えてください。

はじめまして 横浜の技術者の卵です。 頼れる人がいないので投稿します。 申し訳ありませんが どなたか知っている方がいらっしゃれば 教えてください。 社内で使っているシステムの話なのですが ExcelのVBA、マクロを使用してAccessから データをひっぱり出すという作業をしています。 最近、Accessのレコード数が多いことが原因なのか データを引っ張り出すまでに時間がかかる為 どうにか直したいのです、良い方法はないでしょうか？ 少し自分なりにも調べてみたのですが「チェー二ング」と 言う方法があるらしいのですが、Accessのチェー二ングに ついて分かりやすい説明のサイトはないでしょうか？ 宜しくお願い致します。

VB.NET2008を使っているのですが、 TextBox1に入力された文字が正整数の半角数字かどうかの 判定をしたいのですが、何かいい方法はないでしょうか？ どなたかよろしくお願いします。

VB2008でプログラムを作成しています。 数値前提でプログラムを組むとInvalidCastExceptionはハンドルされませんでした。という例外が発生しました。 アプリ実行中にこのようなエラーができると何が良くないのでしょうか？ 対策として例外処理をするという言葉はわかりますが、どのようにコーディングすればよいのでしょうか？ Try Catch ex As Exception ここで何を書けば？？？ End Try 数値を期待して文字列が来た場合は、その後の処理に支障があるわけで、 例外処理はプログラムを止めない予防策で、この場合は、数値ではないと 次のプログラムに進む意味がないので、エラーメッセージを表示させて、その処理は終わりでよいのでしょうか？

以下のような データにコンマが含まれる(単価の項目)CSVファイルから 特定の列を抽出したCSVファイルを作ります。 "顧客ID","住所(送先)","商品ID","商品名","単価","数量","出荷日", "001","○○市○○町○○","202","□□","1,500","10","2009/7/7" "顧客ID","住所(送先)","商品ID","商品名","単価","数量","出荷日", "002","○○市○○町△△","503","◎◎","1,980","5","2009/7/6" 現在は以下のようなバッチファイルで対応しています。 @echo off :顧客ごとのヘッダ情報の行を削除 type syukjnminohyo.csv | find /v "顧客" > temp1.txt :ファイルデータを環境変数に代入し :subでデータの区切りである「","」をタブに変換 for /f "tokens=1,* delims=" %%a in (temp1.txt) do ( set line=%%a call :sub ) :タブを区切りとして特定の列を抽出 for /f "tokens=1,2,5,6 delims= " %%a in (temp2.txt) do ( @echo "%%a","%%b","%%c","%%d" >> out.txt ) :sub set line=%line:","= % echo %line:"=% >> temp2.txt 途中でファイルも作られるなど エレガントでない部分が多いため 皆様のお力をお貸し頂きたく質問いたしました。 よろしくお願いします。

SQL Server2005を使用しています。 以下のような動作を実現したいのですが、どのようなSQLとなるのでしょうか? 以下のような構成のテーブルがあるとします。 テーブルA 分類１(PK)　分類２(PK)　名前 １　　　　　空文字　　　山田 １　　　　　１　　　　　山田太郎 １　　　　　２　　　　　山田花子 ２　　　　　空文字　　　鈴木 テーブルB 番号(PK)　分類１　分類２ １００　　１　　　空文字 １０１　　１　　　１ 外部から受け取るパラメータはテーブルBの番号です。 次の番号を受け取った際に、以下の結果を取得したいのですが、 どのようなSQLとなるのでしょうか? 番号１００ ↓ 山田 山田太郎 山田花子 番号１０１ ↓ 山田太郎 以下の様なSQLを作成して試してみたのですが、番号２をJOINの条件として指定しているため、 番号１００の時に望む結果を得ることが出来ませんでした。 SELECT 　　* FROM 　　テーブルA　AS　A LEFT　JOIN　( 　　SELECT 　　　　* 　　FROM 　　　　テーブルB 　　WHERE 　　　　番号　=　パラメータ )　AS　B ON　　A.分類1　=　B.分類1 AND　A.分類2　=　B.分類2 サブクエリのB.分類２が空文字の場合は、JOINの条件から省くようなことは可能なのでしょうか?

いつもお世話になっています。 タイトルにもあります通り、 アプリから受け取った文字列の日付型変換が上手くいかず失敗します。 状況は下記です。 SQL SERVER 2005に、 アプリから２っの文字列を受け取り、その文字列を日付型に変換し、 日付範囲検索をする。といったストアドを作成しました。 アプリ開発環境はVisualStudio2008、C#のウィンドゥズフォームです。 ストアド自体はManagement Studio上で日付型変換可能な 文字列２っを渡し、単体で実行すると期待通りの動作をします。 しかしアプリから文字列を受け取り実行すると、 「文字列から datetime 型に変換中、変換に失敗しました。」 というエラーがアプリ側に返されます。 しかし、この時アプリが渡す文字列をコピー＆ペーストで ManagementStudioのクエリデザイナで実行すると上手く行きます。 アプリから日付変換前の文字列を渡す時に必要な何かが抜けているのでしょうか？ご教授お願いします。 ---ストアドを呼ぶアプリ側--- string kaishibi; string syuryobi; kaishibi += "1753/01/01"; syuryobi += "9999/12/31"; System.Data.SqlClient.SqlCommand hCommand = cSqlConnection.CreateCommand(); hCommand.CommandText = "EXECUTE [ストアド名] kaishibi,syuryobi"; System.Data.SqlClient.SqlDataReader cReader = hCommand.ExecuteReader(); (ここでエラー、「文字列から datetime 型に変換中、変換に失敗しました」） --ストアド側-- ALTER PROCEDURE [ストアド名] 　@startData VARCHAR(50), 　@endData VARCHAR(50) DECLARE @kaishibi DATETIME, @syuuryoubi DATETIME SET @kaishibi = CONVERT(VARCHAR,@startData,120) SET @syuuryoubi = CONVERT(VARCHAR,@enddata,120) SELECT LOGNO FROM LOG_TBL WHERE DateTime between @kaishibi and @syuuryoubi

sqlビギナーです。 TABLE1には列Ａ,Bがあり下記のようなレコードが入っています。 TABLE1 ---------------------- A | B ---------------------- MTB-L1-1 | 10 MTB-L1-2 | 15 MTB-L1a-1 | 20 MTB-L2-1 | 30 HENSU='MTB-L'の情報があり このHENSUを使って、MTB-L1-1,MTB-L1-2 のみ注出したいのですが どのようなSQLにすればいいでしょうか。 "SELECT * FROM TABLE1 WHERE (((Left(A,6))='" & HENSU & "')); だとL1aも選んでしまいます。 環境 Windows XP MS Sql Server 開発 VB6

vb.net2008　を使用しております。 配列　_s(0) のなかに　"692329001"　というデータが入っています。 このデータの　３桁目の　"0"を　削除して　"69232901" としたいのですが　どうすれば　よろしいでしょうか？ よろしくお願いいたします。

()を付けないほうが良いのでしょうか？ 僕としては付けたほうが良いと思うのですが、どうでしょうか？

VBで複数のCSVファイルから必要なデータのみを 新たなCSVファイルに出力するアプリケーションを作成しています。 処理自体は出力ファイルの作成まできちんとできるのですが、 エクセルで開くと文字化けが起きてしまいます。 文字化けが起きるのは漢字と片仮名（全角、半角両方）です。 ちなみにNotepadで開くと文字化けは起きていませんでした。 また、エクセルのほかにwordpadで開いても文字化けが起きていました。 入力用のCSVファイルの文字コードは分かっていません。 ファイルの読み込みはGetEncoding("Shift_JIS")で読み込んでいます。 文字化けに関する質問は他にも多数あり重複しているかもしれませんが 宜しくお願いします。

ＶＢ２００８　Express Edition　で勉強中なのですが、下記のソースをデバッグを行い実行してみますと、どちらもデバックは正常なのですが、実行時にＸＰ（３２ｂｉｔ）では正常に実行されますが、ＶｉｓｔａＸ６４（６４ｂｉｔ）では実行時にエラーとなります。 ＶＢ２００８のＥｘｐｒｅｓｓ　Ｅｄｉｔｉｏｎは３２ｂｉｔ版と６４ｂｉｔ版が有るのでしょうか。 ダウンロード時には確か有りませんでしたが。 それとも、デバック時又はコンパイル時に６４ｂｉｔ，３２ｂｉｔ指定が有るのでしょうか。 どなたかご存じの方がおられましたらご指導を宜しく御願い致します。 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim objIE As Object Dim strURL As String = "https://order.store.yahoo.co.jp/cgi-bin/wg-request-catalog?charade" objIE = CreateObject("InternetExplorer.application") objIE.Navigate(strURL) objIE.Visible = True 'ここから下の記述にエラーが出る。 While objIE.ReadyState <> 4 While objIE.Busy = True My.Application.DoEvents() End While End While objIE.Document.Forms(0).Item("ship-name").Value = "山本山" objIE.Document.Forms(0).Item("ship-country").Value = "日本" objIE.Document.Forms(0).Submit() End Sub

Windows Power Shell または VB.NETを利用して GUI操作をCUI操作に還元したいのですが何か方法はあるでしょうか 例えば、 song.wmvをWindows Media Player で起動 Windows Media Playerの画面を最大化 音量を最大化 3分待つ Windows Media Playerを閉じる といったことをPower Shellのスクリプトで行うことができるでしょうか？ よろしくお願いします。

windows2003のマシンで全ユーザ情報を取得したいです。 具体的にはnet user "ユーザ名" コマンドを実行したいのですが 対象マシンが複数あり、ユーザもたくさんいるのであまり手間をかけることなくbatかvbsで実行したいのですが 構文を教えていただけないでしょうか c:\net user \\ｘｘｘｘ のユーザー アカウント ------------------------------------------------------------------------------- Administrator ASPNET HelpAssistant SUPPORT_388945a0 Guest コマンドは正常に終了しました。

ASP.netのVB.NETを勉強していて簡単なシステムを作成しています。 簡単な帳票にデータを登録したり編集、削除したりするものです。 DB接続はできたのですが、DBからデータを呼び出す表示、イベントによるDBにデータを登録、そしてDBのデータを編集、削除する方法がみえてきません。 SQLのクエリを使用して行うのでしょうか？ SELECT　呼び出す列　FROMテーブル　 これだけではよびだせませんでした。 すいませんが、知恵をかしてください。 DB接続を行った後、

ASP.netのVB.NETを勉強していて簡単なシステムを作成しています。 簡単な帳票にデータを登録したり編集、削除したりするものです。 DB接続はできたのですが、DBからデータを呼び出す表示、イベントによるDBにデータを登録、そしてDBのデータを編集、削除する方法がみえてきません。 SQLのクエリを使用して行うのでしょうか？ SELECT　呼び出す列　FROMテーブル　 これだけではよびだせませんでした。 すいませんが、知恵をかしてください。 DB接続を行った後、

以下の方法で構造体のデータをSendMessageで送信したい。 　・一つのアプリケーションに１つスレッドがいる 　・TCPにてスレッドの方で電文(Byteデータ)を受信する 　・スレッドから電文内容をSendMessageでメインスレッドに送信する。 電文内容をByteデータのままとメインスレッドに 送信することは可能でしょうか。 （Stringに変換すると、&H00があるため正しく送れない） できればMashalを使用しない方向で考えています。 環境は 　Visual Stadio 2008 　VB.NET です。 よろしくお願いします。

質問が以下の通りです。 １　VBでForm1(親Form),Form2(子Form)を作成 ２　Form1(親Form)を隠れた状態で、まず認証用のForm2(子Form)を呼出 ３　Form2での認証入力が通ったら、Form2を閉じて、Form1を表示させる 　　逆にFormを閉じる ということがしたいです。 いつも、素人のような質問にすみませんでした。 宜しくお願いします。

　こんばんは，いつも勉強させていただいております． どうぞよろしくお願いいたします． 　毎夜寝ずに.NETプログラミングでエクセルが動くのを楽しんでおりますが， 手元の参考書とネット検索だけではすっきりしない疑問点が数点あります． どれか一つでもアドバイスいただけると非常に嬉しいです． もしお詳しい方がいらっしゃいましたら，どうぞお願いいたします． 　「．」が沢山あるような深いプロパティ等を使いたい際（たとえばエクセルの シート上にグラフが数個あり，これらの軸ラベルを変更するとき） xlSheet.ChartObject.Chart.Axes(1).Axistitle.text = "test" といきなり書くと解放できなくなると思うのですが， （１）この一行を書くためだけに，すべての階層のObjectを作成・解放するものなのでしょうか？？？ 　　一応動作はするのですが，あまりこんな書き方を見かけないのですが．．．．． 　　　Dim ChartObject As Object 　　　Dim ChartObjects = xlSheet.ChartObjects 　　　For Each ChartObject In ChartObjects 　　　　　ChartObject.Activate() 　　　　　Dim myChart As Object = ChartObject.Chart 　　　　　Dim myAxes As Object = myChart.Axes 　　　　　Dim myAxis1title As Object = myAxes(1).Axistitle 　　　　　Dim myAxis2title As Object = myAxes(2).Axistitle 　　　　　　　myAxis1title.text = "test" 　　　　　　　myAxis2title.text = "test" 　　　　　MRComObject(myAxis2title) : myAxis2title = Nothing 　　　　　MRComObject(myAxis1title) : myAxis1title = Nothing 　　　　　MRComObject(myChart) : myChart = Nothing 　　　　　MRComObject(myAxes) : myAxes = Nothing 　　　　　MRComObject(ChartObject) : ChartObject = Nothing 　　　Next 　　　MRComObject(ChartObjects) : ChartObjects = Nothing （２）解放の順序については，下の階層からすべき？　みたいなルールは特に無いのでしょうか． 　　　　　'たとえば↓みたいに下の階層から解放するか， 　　　　　MRComObject(myAxis1title) : myAxis1title = Nothing 　　　　　MRComObject(myAxes) : myAxes = Nothing 　　　　　MRComObject(myChart) : myChart = Nothing 　　　　　'もしくは↓みたいに上の階層から解放するか 　　　　　MRComObject(myAxis1title) : myAxis1title = Nothing 　　　　　MRComObject(myAxes) : myAxes = Nothing 　　　　　MRComObject(myChart) : myChart = Nothing （３）下のコードだとぜんぜん問題ないんですが， 　　　　　Dim ChartObject As Object 　　　　　Dim ChartObjects = xlSheet.ChartObjects 　　　　　MRComObject(ChartObject) : ChartObject = Nothing 　　　　　MRComObject(ChartObjects) : ChartObjects = Nothing 　　　次のようにFor,Nextを入れるだけでExcelが解放されなくなります． 　　　　　Dim ChartObject As Object 　　　　　Dim ChartObjects = xlSheet.ChartObjects 　　　　　For Each ChartObject In ChartObjects 　　　　　　　MRComObject(ChartObject) : ChartObject = Nothing 　　　　　Next 　　　　　MRComObject(ChartObjects) : ChartObjects = Nothing 　　　この現象に一番困っております．もし何かお気づきになることがございましたら， 　　　是非ともアドバイスしてやってください． （４）Excel解放のタイミングが，同じプログラム実行時でも弱冠異なるのですが， 　　　これはよくある現象なのでしょうか？それともコーディングに問題が？？？ 　　　　たとえば， 　　　　　　　Excel操作　→解放　→msgbox("終わり") 　　　としたときに，メッセージボックスのOKをわざと押さずに待機していると 　　　OKを押すまでExcel.Exeが解放されない時もあれば，押す前に一瞬で消える時もあります． 　　どれか一つでもアドバイスいただけるようでしたら，是非よろしくお願いします． 　また上記コードの書き方に何か些細な突っ込みでもございましたら，いただければ嬉しいです． 　なにとぞお願いいたします．

　こんばんは，いつも勉強させていただいております． どうぞよろしくお願いいたします． 　毎夜寝ずに.NETプログラミングでエクセルが動くのを楽しんでおりますが， 手元の参考書とネット検索だけではすっきりしない疑問点が数点あります． どれか一つでもアドバイスいただけると非常に嬉しいです． もしお詳しい方がいらっしゃいましたら，どうぞお願いいたします． 　「．」が沢山あるような深いプロパティ等を使いたい際（たとえばエクセルの シート上にグラフが数個あり，これらの軸ラベルを変更するとき） xlSheet.ChartObject.Chart.Axes(1).Axistitle.text = "test" といきなり書くと解放できなくなると思うのですが， （１）この一行を書くためだけに，すべての階層のObjectを作成・解放するものなのでしょうか？？？ 　　一応動作はするのですが，あまりこんな書き方を見かけないのですが．．．．． 　　　Dim ChartObject As Object 　　　Dim ChartObjects = xlSheet.ChartObjects 　　　For Each ChartObject In ChartObjects 　　　　　ChartObject.Activate() 　　　　　Dim myChart As Object = ChartObject.Chart 　　　　　Dim myAxes As Object = myChart.Axes 　　　　　Dim myAxis1title As Object = myAxes(1).Axistitle 　　　　　Dim myAxis2title As Object = myAxes(2).Axistitle 　　　　　　　myAxis1title.text = "test" 　　　　　　　myAxis2title.text = "test" 　　　　　MRComObject(myAxis2title) : myAxis2title = Nothing 　　　　　MRComObject(myAxis1title) : myAxis1title = Nothing 　　　　　MRComObject(myChart) : myChart = Nothing 　　　　　MRComObject(myAxes) : myAxes = Nothing 　　　　　MRComObject(ChartObject) : ChartObject = Nothing 　　　Next 　　　MRComObject(ChartObjects) : ChartObjects = Nothing （２）解放の順序については，下の階層からすべき？　みたいなルールは特に無いのでしょうか． 　　　　　'たとえば↓みたいに下の階層から解放するか， 　　　　　MRComObject(myAxis1title) : myAxis1title = Nothing 　　　　　MRComObject(myAxes) : myAxes = Nothing 　　　　　MRComObject(myChart) : myChart = Nothing 　　　　　'もしくは↓みたいに上の階層から解放するか 　　　　　MRComObject(myAxis1title) : myAxis1title = Nothing 　　　　　MRComObject(myAxes) : myAxes = Nothing 　　　　　MRComObject(myChart) : myChart = Nothing （３）下のコードだとぜんぜん問題ないんですが， 　　　　　Dim ChartObject As Object 　　　　　Dim ChartObjects = xlSheet.ChartObjects 　　　　　MRComObject(ChartObject) : ChartObject = Nothing 　　　　　MRComObject(ChartObjects) : ChartObjects = Nothing 　　　次のようにFor,Nextを入れるだけでExcelが解放されなくなります． 　　　　　Dim ChartObject As Object 　　　　　Dim ChartObjects = xlSheet.ChartObjects 　　　　　For Each ChartObject In ChartObjects 　　　　　　　MRComObject(ChartObject) : ChartObject = Nothing 　　　　　Next 　　　　　MRComObject(ChartObjects) : ChartObjects = Nothing 　　　この現象に一番困っております．もし何かお気づきになることがございましたら， 　　　是非ともアドバイスしてやってください． （４）Excel解放のタイミングが，同じプログラム実行時でも弱冠異なるのですが， 　　　これはよくある現象なのでしょうか？それともコーディングに問題が？？？ 　　　　たとえば， 　　　　　　　Excel操作　→解放　→msgbox("終わり") 　　　としたときに，メッセージボックスのOKをわざと押さずに待機していると 　　　OKを押すまでExcel.Exeが解放されない時もあれば，押す前に一瞬で消える時もあります． 　　どれか一つでもアドバイスいただけるようでしたら，是非よろしくお願いします． 　また上記コードの書き方に何か些細な突っ込みでもございましたら，いただければ嬉しいです． 　なにとぞお願いいたします．