PB 電子会議室
| 発言No. | 更新日 | 題名（クリックすると発言内容と関連するコメントが表示されます） |
|---|---|---|
| 11996 | 00/06/29 14:40:44 | RE(5):PB6.5: SetCurrentDirectoryが呼び出せません・・・ By アミネス |
| 11992 | 00/06/29 13:29:48 | RE(4):PB6.5: SetCurrentDirectoryが呼び出せません・・・ By Taka |
| 11989 | 00/06/29 12:11:35 | RE(3):PB6.5: SetCurrentDirectoryが呼び出せません・・・ By M.M |
| 11986 | 00/06/29 09:23:33 | RE(2):PB6.5: SetCurrentDirectoryが呼び出せません・・・ By アミネス |
| 11973 | 00/06/28 18:04:42 | RE(1):PB6.5: SetCurrentDirectoryが呼び出せません・・・ By M.M |
| 11956 | 00/06/28 13:44:26 | PB6.5: SetCurrentDirectoryが呼び出せません・・・ By アミネス |
カテゴリ：スクリプトの記述
日付：2000年06月29日 09:23 発信者：アミネス
題名：RE(2):PB6.5: SetCurrentDirectoryが呼び出せません・・・
GetCurrentDirectoryA がなかったもので・・・
外部関数に記述するときの REF String lpszCurDir っていう部分は
必ず lpszCurDir という記述じゃないとだめなんですか？
自分で勝手に付けた名前だと動かなかったので。。。
＞[外部関数]
＞FUNCTION UnsignedLong GetCurrentDirectoryA
＞ (Long cchCurDir, REF String lpszCurDir)
＞ LIBRARY \"Kernel32.dll\"
＞FUNCTION Boolean SetCurrentDirectoryA(REF String lpszCurDir)
＞ LIBRARY \"Kernel32.dll\"
＞
＞[スクリプト]
＞//初期設定
＞ string currentDir, moveDir
＞ long textLen, lRet
＞
＞//カレントディレクトリを保存
＞ textLen = 256
＞ currentDir = space(textLen)
＞ lRet = getCurrentDirectoryA(textLen, currentDir)
＞ if lRet=0 then
＞ messageBox(\"エラー\",\"カレントディレクトリが取得できません\")
＞ return
＞ end if
＞
＞//カレントディレクトリを変更
＞ moveDir = \"c:\\windows\"
＞ if setCurrentDirectoryA(moveDir)=false then
＞ messageBox(\"エラー\",\"カレントディレクトリを変更できません\")
＞ return
＞ end if
＞
＞//カレントディレクトリを元に戻す
＞ moveDir = currentDir
＞ if setCurrentDirectoryA(moveDir)=false then
＞ messageBox(\"エラー\",\"カレントディレクトリを元の位置に移動できません\")
＞ return
＞ end if
＞ messageBox(\"\",\"カレントディレクトリの移動に成功しました\")
＞???????????????????????????????????
＞
＞
付加情報：
PowerBuilder Version (記載なし)
Client SoftWare
OS (記載なし)
DBMS (記載なし)
Browser (記載なし)
Server SoftWare
OS (記載なし)
DBMS (記載なし)
WebServer (記載なし)
Copyright © 2013 Power Future Co., Ltd.