粘贴路径到input，提示错误！

bhffhzh

1. #include <ButtonConstants.au3>
   
2. #include <EditConstants.au3>
   
3. #include <GUIConstantsEx.au3>
   
4. #include <StaticConstants.au3>
   
5. #include <WindowsConstants.au3>
   
6. #include <GUIListView.au3>
   
7. #include <IE.au3>
   
8. 
   
9. #region ### START Koda GUI section ### Form=C:\Users\Administrator\Desktop\Form1.kxf
   
10. $Form1 = GUICreate("生成器", 615, 438, 192, 124)
    
11. $Label1 = GUICtrlCreateLabel("记事本路径：", 48, 56, 76, 17)
    
12. $Button1 = GUICtrlCreateButton("一键生成", 144, 120, 321, 33)
    
13. $Input1 = GUICtrlCreateInput("", 120, 53, 345, 21)
    
14. $Button2 = GUICtrlCreateButton("浏览", 480, 49, 49, 25)
    
15. GUISetState()
    
16. Opt("TrayMenuMode", 1) ; 默认托盘菜单项目(脚本已暂停/退出脚本) (Script Paused/Exit) 将不显示.
    
17. 
    
18. #endregion ### END Koda GUI section ###
    
19. While 1
    
20.         $nMsg = GUIGetMsg()
    
21.         Switch $nMsg
    
22.                 Case $GUI_EVENT_CLOSE
    
23.                         Exit
    
24.                 Case $Button2
    
25.                         $var = FileOpenDialog("打开", @DesktopDir & "", "文本文件 (*.txt)", 1 + 4)
    
26.                         If @error Then
    
27.                                 MsgBox(16, "提示", "没有选择文件!")
    
28.                         Else
    
29.                                 $var = StringReplace($var, "|", @CRLF)
    
30.                                 GUICtrlSetData($Input1, $var)
    
31.                         EndIf
    
32.                 Case $Button1
    
33.                         Local $path = GUICtrlRead($Input1)
    
34.                         If $path = "" Then
    
35.                                 MsgBox(16, "提示", "目录不能为空！")
    
36.                         ElseIf StringMid($path, 2, 2) <> ":" Then
    
37.                                 MsgBox(16, "提示", "路径错误，请输入完整路径。")
    
38.                         Else
    
39.                                 MsgBox(0, "提示", "路径正确，")
    
40.                         EndIf
    
41.         EndSwitch
    
42. WEnd
    

复制代码

为什么我直接粘贴路径到input里面,提示错误呢？问题出在哪里了。谢谢。

dncsk

拜托能不能把问题项目说完整 ......

bhffhzh

就是把剪切板里的内容粘贴到这地址栏

ak47gglllk

测试了好几个都正常的，貌似只能是txt格式的。看下是不是你粘贴的类容的后缀不对（不是txt格式的）。希望早日解决你的问题

bhffhzh

我再看看。感谢各位的关注。

shqf

程序测试正常啊。
你的程序与贴出的程序一样吗？可程序中只有“记事本路径”，无图片所示的“日志文件路径”。
关键是你的剪贴板内容哪里来的？具体是什么内容？还有出错的提示是什么呢？程序的要求仅是用FileOpenDialog() 来获取路径的呀！
不知你想实现什么功能？

winple

测试程序正常，可以粘贴路径啊