eclipseでプログラムを書いているのですが、
あるところでつまづいてしまい色々試してみましたが、うまくいきませんでした。
以下つまづいている部分を書いてみました。
プログラムを読むのが面倒だとは思いますが、どうか教えていただけないでしょうか。
メインクラス
import java.io.*;
public class Schedule {
public static void main(String[] args)throws IOException{
Operate o = new Operate();
while(1>0){
o.operate();
}
}
}
メインからここのoperateにとびます。
import java.io.*;
public class Operate {
String [] A = new String[10];
public void operate()throws IOException{
System.out.println(A[0]);/*出力1*/
Register reg = new Register();
reg.register();
}
}
次にregisterがメソッドとして入っているクラスにとびます。
import java.io.*;
public class Register extends Operate {
public void register()throws IOException{
System.out.println("A[0]に入力したい文字列を入力。");
BufferedReader reader= new BufferedReader(new InputStreamReader(System.in));
String register1 = reader.readLine();
A[0] = register1;
System.out.println(A[0]);
}
}
}
これを実行したら、
null
A[0]に入力したい文字列を入力。
si
si
null
A[0]に入力したい文字列を入力。
という表示になってしまいます。
これを、
null
A[0]に入力したい文字列を入力。
si
si
si
A[0]に入力したい文字列を入力。
と表示できるようにしたいのですがどうすればよいのでしょうか。
COD4をプレイしたいのですが、このPCでできるでしょうか。
もらい物なんですが、PCの事よくわからなくって・・・
↓
CPU Intel(R) Core(TM)2 Quad CPU Q9450 @ 2.66GHz
メモリ 2,048MB
グラフィックカード NVIDIA GeForce 9800 GT
HDDの空き容量 362.1GB
OS Windows Vista
PostgreSQLのDBに、SQL文を投げて、結果をシートに書きだす、というマクロを組みました。 しかし、A5などのソフトでこのＳＱＬ文を実行すると正しく結果が返ってくるのですが、下記のマクロで流そうとすると、
.CommandText = Array(myCmd)
部分で”型が一致しません”とエラーを返します。
この原因がおわかりの方がいたら、是非教えて下さい。
netで調べたりしたけどわかりません。
ちなみに、マクロで、注意Ａ）のSQL文を実行すると
エラーなく実行できました。尚、下記のSQL文の改行は
見やすくするためにしているだけで、実際とは異なります。
また、SQL文を３つの変数に区切り、最後にmyCmdにドッキングして
実行したりもしましたがダメでした。
Sub test()
Dim myCnc As String
Dim myCmd As String
'Worksheets.Add 'ワークシートの追加
Sheets("ユーザー名簿").Select
'接続先サーバーを指定
myCnc = "ODBC;DRIVER={PostgreSQL Unicode};DATABASE=" & t_name &
";SERVER=" & s_ver & ";PORT=5432;UID=" & user &
";;SSLmode=disable;ReadOnly=0;Protocol=7,"
'Select 文
myCmd =
"SELECT t_syukka.order_dtl_id As 受注先コード,t_torihikisaki.ryknm As 受注先
FROM
t_nonyusaki, t_syukka,t_torihikisaki
WHERE
t_torihikisaki.tkcd = t_nonyusaki.tkcd
And
t_nonyusaki.jscd = t_syukka.juchusaki_id
And
t_syukka.syukka_date >='20091120'
And
t_syukka.syukka_date <='20091201'"
With ActiveSheet.QueryTables.Add( _
Connection:=myCnc, Destination:=Range("A5"))
.CommandText = Array(myCmd)
.name = t_name
.Refresh BackgroundQuery:=False
End With
End Sub
注意Ａ）
myCmd =
"SELECT
t_syukka.order_dtl_id As 受注先コード,t_torihikisaki.ryknm As 受注先
FROM
t_nonyusaki, t_syukka,t_torihikisaki
WHERE
t_syukka.syukka_date >='20091120' And t_syukka.syukka_date <='20091201'"
環境）
DB:Linux PostgrSQL
クライアント：WindowsXP,VISTA Office2007
PostgreSQLのDBに、SQL文を投げて、結果をシートに書きだす、というマクロを組みました。 しかし、A5などのソフトでこのＳＱＬ文を実行すると正しく結果が返ってくるのですが、下記のマクロで流そうとすると、
.CommandText = Array(myCmd)
部分で”型が一致しません”とエラーを返します。
この原因がおわかりの方がいたら、是非教えて下さい。
netで調べたりしたけどわかりません。
ちなみに、マクロで、注意Ａ）のSQL文を実行すると
エラーなく実行できました。尚、下記のSQL文の改行は
見やすくするためにしているだけで、実際とは異なります。
また、SQL文を３つの変数に区切り、最後にmyCmdにドッキングして
実行したりもしましたがダメでした。
Sub test()
Dim myCnc As String
Dim myCmd As String
'Worksheets.Add 'ワークシートの追加
Sheets("ユーザー名簿").Select
'接続先サーバーを指定
myCnc = "ODBC;DRIVER={PostgreSQL Unicode};DATABASE=" & t_name &
";SERVER=" & s_ver & ";PORT=5432;UID=" & user &
";;SSLmode=disable;ReadOnly=0;Protocol=7,"
'Select 文
myCmd =
"SELECT t_syukka.order_dtl_id As 受注先コード,t_torihikisaki.ryknm As 受注先
FROM
t_nonyusaki, t_syukka,t_torihikisaki
WHERE
t_torihikisaki.tkcd = t_nonyusaki.tkcd
And
t_nonyusaki.jscd = t_syukka.juchusaki_id
And
t_syukka.syukka_date >='20091120'
And
t_syukka.syukka_date <='20091201'"
With ActiveSheet.QueryTables.Add( _
Connection:=myCnc, Destination:=Range("A5"))
.CommandText = Array(myCmd)
.name = t_name
.Refresh BackgroundQuery:=False
End With
End Sub
注意Ａ）
myCmd =
"SELECT
t_syukka.order_dtl_id As 受注先コード,t_torihikisaki.ryknm As 受注先
FROM
t_nonyusaki, t_syukka,t_torihikisaki
WHERE
t_syukka.syukka_date >='20091120' And t_syukka.syukka_date <='20091201'"
環境）
DB:Linux PostgrSQL
クライアント：WindowsXP,VISTA Office2007
