C# と VB.NET の質問掲示板

わんくま同盟

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト


(過去ログ 54 を表示中)
■30053 / )  Re[7]: 値の引渡し
□投稿者/ ホステス (8回)-(2008/12/17(Wed) 16:56:21)
ss1 = "SELECT COUNT(*) FROM TBL_職制 where 事業所コード>'000'"
ss2 = "SELECT 受注元コード AS 受注元c,事業所コード AS 事業所c,部コード AS 部c,事業所略称,部略称,課略称,"
ss2 = ss2 & "事業所名称, 課名称 FROM TBL_職制 where 事業所コード>'000'"

・・・If文省略
rs.Open ss1 & s1, dbman.cn(DB00), adOpenKeyset, adLockReadOnly
If Not rs.BOF And Not rs.EOF Then
Frame2.Caption = "検索結果 (対象:" & rs(0) & " Record)"
End If
rs.Close
Set rs = Nothing
ss2 = ss2 & s1 & " ORDER BY 事SEQ, 部SEQ, 課SEQ "


rs.Open ss2, dbman.cn(DB00), adOpenKeyset, adLockReadOnly


返信 編集キー/


管理者用

- Child Tree -