LISP如何下载远程服务器的文件?

dcl1214

1.      (setq file-loc
   
2.       ($http-server$    ;远程mysql通信函数
   
3.         (list
   
4.     (cons "IP"(getenv "数据库地址"));远程服务器的地址
   
5.     (cons "端口" ($locport$))
   
6.     (cons "接口" ($fu-wu-qi-jie-kou$ "下载文件"));远程服务器支持的方法名
   
7.     (cons "数据库路径" "C:\\ZXCAD.DB")
   
8.     (cons "报文头"
   
9.           (list (cons "Client-Auth" (getenv "ComputerName")))
   
10.     )
    
11.     (cons "Sql" web-file);远程服务器上的相对路径（一般服务器都是根据config控制的相对路径）
    
12.     (cons "http方法" "GET");如果远程服务器要求必须是post，这里改成psot即可，但是，浏览器等软件都无法下载了，只能写代码了
    
13.     (cons "返回格式" "数组");这里其实是告诉软件，服务器返回来的数据是进制文件还是字串文件
    
14.     (cons "保存路径" "c:\\test.dwg");如果是完整路径，程序就按照完整路径保存，如果没有传递完整路径，程序保存在zx-hcml这个变量指定的夹子里面
    
15.         )
    
16.       )
    
17.      )

     (setq file-loc<br />       ($http-server$    ;远程mysql通信函数<br />         (list<br />     (cons "IP"(getenv "数据库地址"));远程服务器的地址<br />     (cons "端口" ($locport$))<br />     (cons "接口" ($fu-wu-qi-jie-kou$ "下载文件"));远程服务器支持的方法名<br />     (cons "数据库路径" "C:\\ZXCAD.DB")<br />     (cons "报文头"<br />           (list (cons "Client-Auth" (getenv "ComputerName")))<br />     )<br />     (cons "Sql" web-file);远程服务器上的相对路径（一般服务器都是根据config控制的相对路径）<br />     (cons "http方法" "GET");如果远程服务器要求必须是post，这里改成psot即可，但是，浏览器等软件都无法下载了，只能写代码了<br />     (cons "返回格式" "数组");这里其实是告诉软件，服务器返回来的数据是进制文件还是字串文件<br />     (cons "保存路径" "c:\\test.dwg");如果是完整路径，程序就按照完整路径保存，如果没有传递完整路径，程序保存在zx-hcml这个变量指定的夹子里面<br />         )<br />       )<br />      )

dcl1214

建议远程服务器端采用post方式支持下载（潮流模式都是get）

cjrun

楼主有没有相关基础资料推荐给我们这些网络编程小白学习一下

花开富贵

大佬有没有关于服务器的资料，供我们瞻仰一下