| |
このみさん、こんにちは
>SQL = "SELECT MAX(給与), 氏名, 部署"
>SQL = SQL + "FROM ment.出荷実績検索情報"
>SQL = SQL + "WHERE 社員コード = :A"
>SQL = SQL + "GROUP BY 氏名, 部署"
>Set RS = CN.Execute(SQL)
ここでは文字列を連結してSQL文を作っています。
データベースの種類が不明ですが、AccessまたはSQL Serverとすると・・
SQL = "SELECT MAX(給与), 氏名, 部署 "
SQL = SQL & "FROM ment.出荷実績検索情報 "
SQL = SQL & "WHERE 社員コード = " & A & " "
SQL = SQL & "GROUP BY 氏名, 部署"
こんな感じで、変数Aを文字列と連結します。
この場合、変数Aは引数ではありませんのでご注意ください。
なお社員番号のフィールド属性が文字列の場合は以下のようにコーテーションでくくります。
SQL = SQL & "WHERE 社員コード = '" & A & "' "
＃蛇足1 変数Aはわかりづらいので、意味のあるものにしたほうがいいような・・
＃蛇足2 VBAでは文字列連結には & を使ったほうがいいような・・
＃蛇足3 SQL文のスペースを意識しましょう・・（例では各列の最後のスペース）
|
|
- 03/4/22(火) 12:43 -
