VB.NET質問ｽﾚ (Part6)

1 名前：デフォルトの名無しさん [04/07/03 08:49] VB.NETの質問全般です 過去スレ VB.NET質問ｽﾚ (Part5) pc5.2ch.net/test/read.cgi/tech/1078134703/ VB.NET質問ｽﾚ (Part4) pc2.2ch.net/test/read.cgi/tech/1065269043/ 【老若】VB.net質問ｽﾚ【男女】 (Part3) pc2.2ch.net/test/read.cgi/tech/1056281084/ 【老若】VB.net質問ｽﾚ【男女】 (Part2) pc2.2ch.net/tech/kako/1043/10436/1043629429.html 【老若】VB.net質問ｽﾚ【男女】 pc2.2ch.net/tech/kako/1025/10258/1025848458.html 692 名前：デフォルトの名無しさん mailto:sage [04/09/01 05:32] >>691 意味ないレスしてんじゃねーよ おまえはチラシの裏にでもレスしてろ 693 名前：デフォルトの名無しさん [04/09/01 07:53] ｵﾏｴﾓﾅｰ 694 名前：デフォルトの名無しさん [04/09/01 07:54] ここは、役に立たないｲｿﾀｰﾈｯﾂですね。 695 名前：689 mailto:sage [04/09/01 11:02] >>688 >>690 Accessとかでやった方がすこぶる簡単だと思われ 696 名前：デフォルトの名無しさん [04/09/01 20:53] ACCESS以下だと言う事が露呈しました。 697 名前：デフォルトの名無しさん mailto:sage [04/09/02 01:32] Accessって何？ 698 名前：デフォルトの名無しさん mailto:sage [04/09/02 02:40] TreeViewコントロールのツリー構造をどこかに保存しておき、 アプリケーションを起動したときに、そのツリー構造を正確に 再現するようにしたいんですが、どうしたらいいのか見当つかず 困っています・・・。このツリー構造は、ユーザーがノードを 追加・削除できるもので、プログラマ側が、具体的にどのような ツリー構造となるかは予想できません。TreeViewコントロールは いろんなアプリに利用されていて、保存・再現はほとんど必須の テクニックだと思うのですが・・・。どのように処理するとよいんで しょうか。 699 名前：デフォルトの名無しさん mailto:sage [04/09/02 10:34] >>698 検索しろ。過去ログ嫁。 700 名前：デフォルトの名無しさん mailto:sage [04/09/02 17:40] Webサービスで <WebMethod()> _ Public Function FX(ByVal X As Integer, ByVal Y As Integer, ByVal Z As Integer) As Integer Z = X + Y End Function というサービスを起動し クライアントアプリケーション（VB.NET）でZの値を取得しようとしたのですが 値が返ってきません Webサービスでは引数に戻り地を渡すことは出来ないのでしょうか？ 701 名前：デフォルトの名無しさん mailto:sage [04/09/02 19:46] ByVal Z As Integer じゃなくて ByRef Z As Integer じゃないのかな 702 名前：デフォルトの名無しさん mailto:sage [04/09/02 21:46] >>697 Office製品の一部？ 703 名前：デフォルトの名無しさん mailto:sage [04/09/02 22:13] >>700 何がしたい 704 名前：デフォルトの名無しさん mailto:sage [04/09/02 22:23] >>698 キーワード: シリアライズ 705 名前：デフォルトの名無しさん mailto:sage [04/09/02 22:39] シリアライズする元ですら作れないと思われ。 っていうか、TreeViewの情報って何を保存しときたいの？ ツリーの構造と状態？名前？その他のデータ？ その情報は誰が（何が）操作、作成するわけ？ 706 名前：デフォルトの名無しさん [04/09/02 22:46] 役に立たないから落とせよ、このスレ。 ﾌﾟ 707 名前：デフォルトの名無しさん mailto:sage [04/09/02 22:48] (σ´∀｀)σ）・ω・） >>706 708 名前：デフォルトの名無しさん mailto:sage [04/09/02 23:38] みんな基本コントロールを継承して軽くカスタマイズして使ってるだろけど、 ネットで公開してるのは少ないな。 TreeViewの構造を読み書きできる継承クラスぐらい落ちてそうなもんなのに。 709 名前：700 mailto:sage [04/09/03 00:25] おそくなりました >>701 ByRefにしてみてもダメでした >>703 サーバ上のとあるユーティリティ（COMコンポーネントで実装）を実行して 検索結果を返すというサービスです 複数の結果を同時に返す必要があるので 引数で返す方法をとりたかったのですが 710 名前：デフォルトの名無しさん mailto:sage [04/09/03 08:54] ＞７００ Returnしなくていいのか？ 711 名前：デフォルトの名無しさん mailto:sage [04/09/03 08:56] ＞７００ ７０９読んでなかった、７１０は見逃してくれ。 構造体で返したらだめ？ 712 名前：デフォルトの名無しさん [04/09/03 11:18] めちゃめちゃ基本的な質問ですが。 ポップアップして処理状況を表示したりするときって、どういう処理してます？ MessageBoxと違って、自動で閉じたりしたい場合。 CreateObject("WScript.Shell").Popupだと秒数指定で閉じられるけど、 これだと外部からクローズできるのかな？ でもこんなので遅延バインディングするのもなんか嫌なかんじ。 わざわざ個別にフォーム作るのもめんどくさいんで、 Timeoutプロパティとか表示メッセージのプロパティとかを くっつけたクラスをさくっと作ろうかと思ったけど、 普通みんなどうしてるんでしょう。 713 名前：デフォルトの名無しさん mailto:sage [04/09/03 12:36] 時間が来たら自律的に死ぬクラスがそんなに悩むようなこととも思えないが。。 714 名前：デフォルトの名無しさん mailto:sage [04/09/03 14:05] 作るのに悩んでるんじゃなくて、 定石を知りたいんじゃないのかな？ 自律死はともかく、ポップアップ窓はなんか標準であってもよさそうだし。 715 名前：デフォルトの名無しさん mailto:sage [04/09/03 14:34] (´-`).｡ｏO( 自演Z 716 名前：700 mailto:sage [04/09/03 15:26] >>711 本来はクライアントアプリケーションで使うOCXを Webサービスで使おうとしているので 　　　　r = FX.HOGE(X,Y,Z) <= Zに計算結果、rは成功か失敗か このようなOCXの場合 　　　　r = FXweb.HOGE(X,Y,Z) <=Web経由で同じ作業をさせたい のように FXオブジェクト をWeb参照にするだけで、現状のｿｰｽを書き換えたかったのです もともと「IIS（ASP)でも使えます」というOCXだったので 上記のような使い方が出来るものかと思いまして・・・ ただWebサービスの内部はXMLのPOSTのようなので、引数はInputのみなのかもしれません 別の方法が無いか試して見ます 717 名前：デフォルトの名無しさん [04/09/03 17:04] vb.netで「ペイント」のようなソフトを作りたいんですけど、 良いサンプルありませんか？ 718 名前：デフォルトの名無しさん mailto:sage [04/09/03 18:46] 無い 719 名前：デフォルトの名無しさん [04/09/03 19:08] Dim X As string = (SqlDataAdapter1.SelectCommand.CommandText = "SELECT name FROM member WHERE member_id = 25") ってやったら、Ｘにid25番の人のnameじゃなくて、ＴｒｕｅかＦａｌｓｅが帰ってきちゃうんで すが、nameを返すにはどうしたらよいでしょうか？ 720 名前：デフォルトの名無しさん mailto:sage [04/09/03 19:49] >>719 Dataset の使い方を一から勉強しなおす。 721 名前：デフォルトの名無しさん mailto:sage [04/09/03 20:02] DBやったこと無いけど>>719は絶対に真偽値を返す事だけはわかる。 722 名前：まんこ ◆yCMANKO3dM [04/09/03 20:11] 質問内容からして素人なんだから、だれか説明してやれよｗｗｗｗ。 723 名前：デフォルトの名無しさん [04/09/03 21:01] ばか、ここは生まれながらにして、VBが使える神の集うスレナンダよ！ だから、どんな質問でも完璧に答えられる。 自分で調べろ！ な？完璧だろ？ 724 名前：デフォルトの名無しさん mailto:sage [04/09/03 22:37] タスクトレイに表示したアイコンから www.geocities.jp/mootdata/unno.jpg みたいにメッセージを表示したいのですが どう殺ったらよいのでしょうか？ 725 名前：デフォルトの名無しさん mailto:sage [04/09/04 00:24] >>713 簡単なようだが、まともに動作する、かつ問題のない こういうクラスを作るのは、それ程簡単でもないぞ。 726 名前：デフォルトの名無しさん [04/09/04 00:54] >>724 VBの神が答えてやろう。 自分で調べろ。 727 名前：デフォルトの名無しさん [04/09/04 01:11] >>724 一番簡単なのは新しいハードウエアを抜き差しすることだな 728 名前：デフォルトの名無しさん mailto:sage [04/09/04 01:12] Objectのキャストについてどなたかご存じでしたら教えてください。 ・フォームに複数のコントロールがある ・各コントロールのTagプロパティに、文字列 　またはオブジェクトがセットされている この状態で、フォーム内の全コントロールを参照して Tagプロパティに文字列"hogehoge"がセットされているもの だけに処理を施したいと思い、Tagプロパティをcstrでキャストして "hogehoge"と比較したいのですが オブジェクトが入っている場合、エラーになってしまいます。 こういう場合、cstrでキャストできるかどうかの判断をする方法 というのはあるのでしょうか？ それとも、TryCatchで例外を拾うしかないのでしょうか？ 729 名前：デフォルトの名無しさん mailto:sage [04/09/04 01:19] If TypeOf hoge.Tag Is String AndAlso CStr(hoge.Tag) = "hogehoge" Then 　ほにゃらら 730 名前：デフォルトの名無しさん [04/09/04 08:01] ↑ちがうだろ。 正解は、自分で調べろ。だろw 731 名前：デフォルトの名無しさん mailto:sage [04/09/04 08:36] なにこの良スレ 732 名前：デフォルトの名無しさん [04/09/04 09:03] 初心者に”自分で調べろ”と言って、日ごろの憂さを晴らすデジタル・ドカタ のスッドレはココですか？ 733 名前：デフォルトの名無しさん mailto:sage [04/09/04 10:14] 初心者じゃなくて、何か（例えば「初心者」）を口実っていうか免罪符にして 他人を利用しようとするズウズウしい横着者を叩いて日ごろのウサを晴らす デジドカのスレがここですが文句ありますか。 ついでに自分のあつかましさを批判されると逆切れする>>732みたいな あつかましい奴ももれなく叩いておりますが。 734 名前：デフォルトの名無しさん [04/09/04 10:20] ↑デジタルドカタキター。 735 名前：デフォルトの名無しさん mailto:sage [04/09/04 10:33] 休日の朝から、カルシウム不足の>>733が湧いたな、牛乳でも飲んでろ。 >>719もまいは、明日から俺のメイドさんになること。もしくは口からクソを垂れる前と後 にSirをつけること。あと、入門書に乗ってないことでも、冷静に色々やってみろ。 '変数の定義 Dim X As String 'SqlConnection1を使って、データコマンド作成 Dim cmd As SqlClient.SqlCommand = SqlConnection1.CreateCommand 'データーリーダーの設定 Dim dr As SqlClient.SqlDataReader 'コマンドのコネクション設定 cmd.Connection = SqlConnection1 '検索条件の設定（Ａ） cmd.CommandText = "SELECT name FROM member WHERE incol_id = 25 " 'コネクションを開く() SqlConnection1.Open() 'データリーダーから、データーを読み出す dr = cmd.ExecuteReader() '読めたら、Xに代入・・・（Ａ）のＳＱＬでnameのところを*にしてＸをＹだのＺだのに変えて、 '好きなだけ変数を引っ張れｗ Do While dr.Read = True X = dr("name") Loop 'データリーダーを閉じる() dr.Close() 'コネクションを閉じる() SqlConnection1.Close() デジタルドカタは、人に者を教えるときはそいつのレベルまで下がって教えてやれよｗ。 お前らだって誰かに習っただろうにｗｗｗ。 736 名前：デフォルトの名無しさん mailto:sage [04/09/04 11:00] >>724 これは漏れも知りたい >>727 ﾜﾛﾀ 737 名前：デフォルトの名無しさん mailto:sage [04/09/04 13:05] >>724 Baloon Tooltip を使え。 738 名前：デフォルトの名無しさん [04/09/04 16:07] DateTimePickerコントロールをデータセットに連結してます。 ユーザー操作無しにコントロールのValue値をデータセットに反映させるには どうすればいいのでしょうか？ 例えば、新規レコード追加Formでコントロールに年月日が表示されますが、 その日付でいいやと言うことでコントロールを操作しないと、新規レコードの 日付はNullになってしまいます。 これを何とかしたいです。言葉足らずがあったらすみませんm(_ _)m 739 名前：デフォルトの名無しさん [04/09/04 17:43] 変更がない時は、Nowを突っ込む。 Null入れてんじゃねえよ！と言うエラー捕まえて、Nowを突っ込む。 てのは？ 740 名前：デフォルトの名無しさん mailto:sage [04/09/04 17:56] 意味がわかりません 741 名前：738 mailto:sage [04/09/04 18:07] >>739 レスありがとうです。 現状は、 Dim dvHogeHoge As DataView Dim cm As CurrencyManager DateTimePickre.DataBindings.Add("Text",dvHogeHoge,"HIDUKE") みたいな感じになってるので、 If DateTimePickre.Text = "" Then dvHogeHoge(cm.Position)("HIDUKE") = Now() End If ってな感じで試してみようと思います。 742 名前：デフォルトの名無しさん [04/09/04 18:09] だから、直接連結させずに、一端変数に入れて、変数に入れた内容をupdateするときに その変数をＤＢに突っ込めば？んで、変数の初期値をnowにでもしとけば、底がＮｕｌｌに なるって事はないでそ？ 743 名前：デフォルトの名無しさん mailto:sage [04/09/04 18:10] って、>>740は>>741とは違う人だったかｗ。 744 名前：デフォルトの名無しさん mailto:sage [04/09/04 20:04] 自フォームのListViewから（エクスプローラのように）他のアプリ ケーションに対し、Drag&Dropでファイル名を与えたいのですが、 方法がよくわかりません。 Private Sub ListView1_ItemDrag(ByVal sender As Object, ByVal e As System.Windows.Forms.ItemDragEventArgs) Handles ListView1.ItemDrag Dim filename as String filename = (略) ListView1.DoDragDrop(filename, DragDropEffects.All) End Sub としてみたのですが、Dragしてもマウスカーソルは(/)のままで、 エクスプローラからのDrag&Dropなら受け取ってくれるアプリも Dropに無反応です。 例外としてMS Wordは文字列（filename）を受け取ってくれました。 何かやるべきことが抜け落ちているのでしょうか、教えてください。 745 名前：デフォルトの名無しさん mailto:sage [04/09/04 21:06] たしかオライリーだっけ？それ使えばいいのかな 746 名前：デフォルトの名無しさん [04/09/05 07:14] 質問させてもらいます。 Textbox1〜3にA,B,Cと入力した文字を、WriteLine関数 を使って、テキストファイルの１行目に "A","B","C" というような内容で保存したのですが。 ListViewに見出し行を３つ設定したもの （例えば 番号,氏名,フリガナ ） を、それぞれ見出し行別に、保存したファイルの内容を 表示するように読み込むにはどうしたらいいでしょうか。 747 名前：デフォルトの名無しさん mailto:sage [04/09/05 10:11] 少しは考えろ 748 名前：デフォルトの名無しさん mailto:sage [04/09/05 11:39] オマイもその生産性のない行為と人生について考えたらどうかね 749 名前：デフォルトの名無しさん mailto:sage [04/09/05 12:02] クレタ人は嘘つきだとクレタ人はいった。 生産性のない行為と人生について考えろ、といった者は、 「生産性のない行為と人生について考えろ」という行為の生産性と 彼の人生にいおける意味について考えた．．．？ 750 名前：デフォルトの名無しさん mailto:sage [04/09/05 12:23] 面白い！ 751 名前：デフォルトの名無しさん mailto:sage [04/09/05 14:32] >>749 考えたらこんな感じになった ってかＶＢじゃなくなってしまった　すまそ public Menbs = new Menbs(748); while(にちゃんねら.人類なんてどうしようもないんだよとオモタカウンタ < 1000000) { 　foreach(２ＣＨスレッド　スレ in ２ＣＨ) 　{ 　　for(int i=1; i<1001;++i) 　　{ 　　　if(にちゃんねら.watch(スレ,i)==Menbs.ゴミクズ || にちゃんねら.watch(スレ,i)==Menbs.糞レス) 　　　　++ にちゃんねら.人類なんてどうしようもないんだよとオモタカウンタ; 　　　++にちゃんねら.ストレス; 　　} 　} } print("そうか、人類皆殺しにすればいいだよ\n"); Exit(人生）; 752 名前：デフォルトの名無しさん mailto:sage [04/09/05 18:28] ちゃんとVB.NETで書かんかい。 753 名前：デフォルトの名無しさん [04/09/05 19:13] 質問させてください。 タイマーの割り込みは１ｍｓ単位で設定できるようなのですが、実際に動かすと、１０ｍｓ単位になっているようです。 １ｍｓ単位で割り込みをかけられないのでしょうか？ 754 名前：デフォルトの名無しさん mailto:sage [04/09/05 19:18] 何のタイマーってかどういうタイマーってか、Timerは何使ってんだ？ ちなみにまじめに書くと多分やろうとしてることは無理だからあきらめろ。 755 名前：デフォルトの名無しさん mailto:sage [04/09/05 20:34] >>753 知ってるけど教えてやらない 756 名前：デフォルトの名無しさん [04/09/05 20:39] そんなこと言わないで教えてよ。 757 名前：デフォルトの名無しさん mailto:sage [04/09/05 22:28] >>756 System.Timers.Timerは精度が高い www.microsoft.com/japan/msdn/library/default.asp?url=/japan/msdn/library/ja/cpref/html/frlrfsystemtimerstimerclasselapsedtopic.asp > イベントを時間どおりに発生させるという点で、Windows のタイマより正確です。 758 名前：デフォルトの名無しさん [04/09/06 00:04] >>757 ありがとうございました。 明日、会社で試してみます。 759 名前：デフォルトの名無しさん mailto:sage [04/09/06 00:08] 正直結局同じような問題に引っかかると思うぞ… 760 名前：デフォルトの名無しさん mailto:sage [04/09/06 00:21] Winのプロセスのタイムスライスってmsecのオーダーだったような気がするんだけど。。 OSのタイムスライスより短い間隔のイベントって無理じゃないだろうか？ 少なくともマイコンのタイマ割り込みみたいに厳密にはいかないはず。 >>753って組み込み系の人か？ Winのプログラミングってのはハード（CPU）をプログラミングしてるんじゃなくて ハード上に仮構された仮想機械をプログラミングしてるんだってことを忘れてないか？ 761 名前：なんかの壁 [04/09/06 10:47] 不思議な現象に悩んでいます。 DatagridのdataSourceにDatatableを設定して表示しています。 プログラムでDatatableをカラムから作成しています。 1回目の実行ではうまく表示されます。 2回目でDatatable作り直すとカラムだけ表示されて、データ部分が 表示されません。 1回目も2回目も動くプログラム部分は同じです。対象となるデータが異なるだけです。 (ちなみに、プログラムを再起動して先ほど2回目に行ったデータで実行してみると正しくデータも表示 されています) なにか初期設定すべきことでもれていることがあるようですが、 いくら調べてもわかりません。 762 名前：デフォルトの名無しさん mailto:sage [04/09/06 11:13] 不思議ですね。 763 名前：デフォルトの名無しさん [04/09/06 15:25] ソースを張れよ 764 名前：なんかの壁 [04/09/06 16:23] 失礼いたしました。 ソースはかなり大きいので・・・。 問題箇所が判明しました。 datatableを作り直すとき、resetメソッドを使っていたのが問題だったようです。 テーブル自体は作り直せるのですが、何かの情報が失われるようです。 　　　　(Public tbl as Datatable) (Form_Loadで　tbl = New DataTable("table1")) 元: tbl.reset() 修正後: tbl = Nothing tbl = New DataTable("table1") 本当の理由がわからないのが弱点ですが。 765 名前：デフォルトの名無しさん mailto:sage [04/09/06 16:36] ┐(´ｰ｀)┌ 766 名前：デフォルトの名無しさん [04/09/06 17:27] ちょっと急ぎなんで過去ログとか読んでなくてすみません。 textboxをラベルみたいに表示させたいんですが、 どうしたらよいでしょうか？ 文字色は黒でフォーカスが行かないよう（クリックも不可）にしたいです。 767 名前：デフォルトの名無しさん mailto:sage [04/09/06 17:36] >>766 知ってるが急いでるんで教えられない。 768 名前：デフォルトの名無しさん [04/09/06 17:39] enable = false 769 名前：デフォルトの名無しさん [04/09/06 17:43] enable = false でやると、 文字色が灰色になっちゃいますよね？ 文字色黒のまま使いたいのですが・・・ 770 名前：デフォルトの名無しさん mailto:sage [04/09/06 18:08] readonly = true 771 名前：デフォルトの名無しさん [04/09/06 18:11] readonly = true でやると クリックした時にフォーカスが行きますよね？ 文字色黒、クリック不可の状態を作りたいのですが、 どうしたらよいでしょうか？ 772 名前：デフォルトの名無しさん [04/09/06 18:13] すいません。 クリック不可ではなく、選択不可です。 文字色黒、中の文字を選択不可の状態を作りたいです。 773 名前：デフォルトの名無しさん [04/09/06 18:34] 上からラベルをかぶせる 774 名前：デフォルトの名無しさん [04/09/06 18:37] やっぱラベルかぶせるしかありませんかね？ テキストボックスのみでどうにかできるのが、 理想なんですが。 775 名前：デフォルトの名無しさん [04/09/06 18:38] つ〜か、なんでラベルが使えないの？ 776 名前：デフォルトの名無しさん mailto:sage [04/09/06 18:38] ていうか、なんでラベルじゃだめなのか。 777 名前：デフォルトの名無しさん mailto:sage [04/09/06 18:38] オホホかぶった。 778 名前：デフォルトの名無しさん [04/09/06 18:42] パラメータによって、 そのフィールドが入力出来たり出来なかったりします。 で、入力不可の時はラベルみたいにして欲しいと言われてるんで。 779 名前：デフォルトの名無しさん mailto:sage [04/09/06 18:49] Windows標準から外れたことをやろうとしてるわけだから エレガントに解決しようとせず、実際にラベルを使うのが ベストだと思う。 実行時にラベルを生成して、TextBoxと同じBoundsに 置いて、TextBoxを消せばいいんだろ。 780 名前：デフォルトの名無しさん [04/09/06 19:04] わかりました。 そのやり方で上司と相談してみます。 回答ありがとうございました。 781 名前：デフォルトの名無しさん mailto:sage [04/09/06 19:05] sage忘れた。すみません。 782 名前：779 mailto:sage [04/09/06 20:02] >>780 その要求の出所がお客じゃなくて上司だったら、 「そんな間抜けなUIじゃ笑われますよ」って言ってやるが。 783 名前：デフォルトの名無しさん mailto:sage [04/09/06 20:29] 注文が多いな 784 名前：デフォルトの名無しさん [04/09/06 20:46] 笑うのはプログラマの都合。見た目重視を求めるなら 十分有りうる想定。 笑われますよ、とか、出来ませんとかは只の言い訳だし。 785 名前：デフォルトの名無しさん mailto:sage [04/09/06 21:19] いや、見た目重視ならむしろWinの標準のUIの方が統一感があり直観的だと思うが。。 それ以上に必要以上に見た目が変化するUIなんてダサイしイライラするだろう。 まあ、マーキーで文字が流れまくりのウェブサイトをかっこいいと思う人も いるわけだから蓼食う虫も好き好きといえばそれまでだけど。 786 名前：デフォルトの名無しさん mailto:sage [04/09/06 21:31] Textboxを継承してLabelを内在するコントロールクラス作っとけ。 で、プロパティで表示を切り替え。 787 名前：779 mailto:sage [04/09/06 21:39] >>784 「すいません、できません」は言い訳っていわないと思うが。 「なんでそんなバカな仕様で受けてきたんだ」はよく使う言い訳。 というか遠吠え。 788 名前：デフォルトの名無しさん mailto:sage [04/09/07 00:12] >>784 言われたこと全部やろうとするのかお前は。 789 名前：デフォルトの名無しさん mailto:sage [04/09/07 09:28] メール送信のプログラムを作成していたのですが、CDO.messageにアクセスできません。 という例外がでて送信することができません。 調べたところ私の使ってるメールサーバのSMTPがPOP before SMTPになっていたので 1〜4行目を追加したところ、自分から自分には送信できたのですが 他のメールアドレスに送信すると同じ例外が帰ってきました。 本についてるメール送受信のサンプルソースなども試したのですが わたしのメールサーバの設定では、例外こそ出ないものの他のメアドに送信すると 何故かメールが消えてしまい、相手にも届かなければこちらに送信エラーで 帰ってもきませんでした。 どなたか良い解決方法はないでしょうか？ 1 Dim tcp As New System.Net.Sockets.TcpClient() 2 tcp.Connect("pop.hogenet.ne.jp", 110) 3 Dim sw As New StreamWriter(tcp.GetStream()) 4 sw.Write("USER hoge" + vbCrLf + "PASS ******" + vbCrLf + "STAT" + vbCrLf + "QUIT" + vbCrLf) 5 Dim mm As New System.Web.Mail.MailMessage() 6 mm.From = "hoge@hogenet.ne.jp" 7 mm.To = "piyo@piyo.co.jp" 8 mm.Subject = "てすと" 9 mm.Body = "てすとです" 10 mm.BodyEncoding = System.Text.Encoding.GetEncoding(50220) 11 System.Web.Mail.SmtpMail.SmtpServer = "smtp.hogenet.ne.jp" 12 System.Web.Mail.SmtpMail.Send(mm) 790 名前：デフォルトの名無しさん mailto:sage [04/09/07 09:49] 追記 なお、自分自身にメールを送信すると 必ず差出人のところ『のみ』が文字化けしてしまいます。 ただ、差出人を本当のメールアドレスの"hoge@hogenet.co.jp"から "hage@hogenet.co.jp"や"hoge@hogehogenet.co.jp" などと出鱈目なものにすると何故か文字化けせずに受信できました。 使用環境は WindowsXP Professional Version2002 Service Pack 1 Microsoft Visual Basic .NET Microsoft.NET Framework 1.0. 使用しているメールソフトはNetscap 7.1です 791 名前：デフォルトの名無しさん mailto:sage [04/09/07 10:37] 関係あるかわからんけど mm.Headers("Content-Transfer-Encoding") = "7bit" これしたらどうだろうか。これしないとQuoted-Printableになっちゃって 受け付けないor化ける相手がいたことならある。 792 名前：デフォルトの名無しさん [04/09/07 10:56] >>789 プロバイダ経由しないで送信できないの？ たとえばIISからとか

---

---

[ 続きを読む ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef