设为首页收藏本站

晓东CAD家园-论坛

 找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 1572|回复: 16

[原创] lisp通过Go发送Sql语句访问Sqlite数据库

[复制链接]
发表于 2020-1-9 20:51:00 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
本帖最后由 dcl1214 于 2020-2-21 16:36 编辑

经过测试,lisp可以通过GO访问sqlite数据库,速度非常快,所以,现在将工具分享出来

附件里面有一个data数据库和一个sqlite.exe程序,sqlite.exe是Go语言开发的,您只需要将两个文件放在一个目录下面就好了,exe双击启动后会自己找到db数据库文件
exe启动后会在注册表中HKEY_CURRENT_USER\ZXCAD\Server_Client\loc位置写明端口号和exe的路径,程序默认从8000端口开始扫描,如果8000端口被占用,程序会使用8001,如果8001被占用,程序会找8002,依次类推

exe支持32位系统和64位系统通吃,不依赖系统任何组件,例如:不依赖vcruntime,不依赖.net,只要您的电脑能开机就能正常运行

启动程序后会在任务管理器里面看到sqlite通信的任务

您可以复制和转发本程序,禁止修改图标和属性信息
遇到bug请发帖,我会及时修复

目前接口支持了四个:test Query Update evaluate_shortest_path
       test返回基本信息
       Query主要负责查询,例如:select *......
       Update主要负责修改数据库,同时该接口支持事务提交           evaluate_shortest_path 迪杰斯特拉算法接口

2020年2月21日支持db数据库的文件夹路经指定

  1. (defun $URLencode$
  2.                    (str / code *SCR DATA)
  3.                                         ;($URLencode$  "http://192.168.0.107:8848/download?filename=中国.png")
  4.   (if STR
  5.     (if        (or
  6.           *SCR
  7.           (setq
  8.             *SCR (vlax-create-object
  9.                    "Aec32BitAppServer.AecScriptControl.1"
  10.                  )
  11.           )
  12.           (setq *SCR (vlax-create-object "ScriptControl"))
  13.         )
  14.       (progn
  15.         (vlax-put *SCR 'language "VBScript")
  16.         (setq code
  17.                "Function UTF8Encode(szString)
  18.         Dim szChar,szTemp,szCode
  19.         Dim szHex,szBin
  20.         Dim iCount1,iCount2
  21.         Dim iStrLen1,iStrLen2
  22.         Dim lResult
  23.         Dim lAscVal
  24.         exclude=\"-_.!~*'();/?:@&=+$,#\"
  25.         szString = Trim(szString)
  26.         iStrLen1 = Len(szString)
  27.         For iCount1 = 1 To iStrLen1
  28.             szChar = Mid(szString, iCount1, 1)
  29.             lAscVal = AscW(szChar)
  30.             If lAscVal >= &H0 And lAscVal <= &HFF Then
  31.                 If (lAscVal >= &H30 And lAscVal <= &H39) Or (lAscVal >= &H41 And lAscVal <= &H5A) Or (lAscVal >= &H61 And lAscVal <= &H7A) Or InStr(exclude,szChar) >0 Then
  32.                     szCode = szCode & szChar
  33.                 Else
  34.                     szCode = szCode & \"%\" & Hex(AscW(szChar))
  35.                 End If
  36.             Else
  37.                 szHex = Hex(AscW(szChar))
  38.                 iStrLen2 = Len(szHex)
  39.                 For iCount2 = 1 To iStrLen2
  40.                     szChar = Mid(szHex, iCount2, 1)
  41.                     szBin = szBin & Mid(\"0000;0001;0010;0011;0100;0101;0110;0111;1000;1001;1010;1011;1100;1101;1110;1111;\", CLng(\"&H\" & szChar) * 5 + 1, 4)
  42.                 Next
  43.                 szTemp = \"1110\" & Left(szBin, 4) & \"10\" & Mid(szBin, 5, 6) & \"10\" & Right(szBin, 6)
  44.                 For iCount2 = 1 To 24
  45.                     If Mid(szTemp, iCount2, 1) = \"1\" Then
  46.                         lResult = lResult + 1 * 2 ^ (24 - iCount2)
  47.                     Else
  48.                         lResult = lResult + 0 * 2 ^ (24 - iCount2)
  49.                     End If
  50.                 Next
  51.                 szTemp = Hex(lResult)
  52.                 szCode = szCode & \"%\" & Left(szTemp, 2) & \"%\" & Mid(szTemp, 3, 2) & \"%\" & Right(szTemp, 2)
  53.             End If
  54.             szBin = vbNullString
  55.             lResult = 0
  56.         Next
  57.         UTF8Encode = szCode
  58.     End Function"
  59.         )
  60.         (if (and
  61.               (not (vl-catch-all-error-p
  62.                      (vl-catch-all-apply
  63.                        'vlax-invoke
  64.                        (list *SCR
  65.                              'addcode
  66.                              code
  67.                        )
  68.                      )
  69.                    )
  70.               )
  71.               (not (vl-catch-all-error-p
  72.                      (setq str (vl-catch-all-apply
  73.                                  'vlax-invoke
  74.                                  (list *SCR
  75.                                        'run
  76.                                        "UTF8Encode"
  77.                                        str
  78.                                  )
  79.                                )
  80.                      )
  81.                    )
  82.               )
  83.             )
  84.           ()
  85.           (setq str nil)
  86.         )
  87.         (if *SCR
  88.           (vlax-release-object *SCR)
  89.         )
  90.       )
  91.       (progn (print "调用VBScript转码失败,组件未找到"))
  92.     )
  93.   )
  94.   str
  95. )
  96. (defun $带有报文头的POST/GET请求$ (lst              /                 $get-vaule$
  97.                                    $open$     $send$         array&str
  98.                                    content    db-f         get&post
  99.                                    header     header-vaule
  100.                                    host              jg         objhttp
  101.                                    return-value                 status
  102.                                    str
  103.                                   )
  104.   (DEFUN ERR ()
  105.     ()
  106.   )
  107.   (defun $open$        (objHttp GET&POST host / return-value)
  108.     (IF        (vl-catch-all-error-p
  109.           (SETQ        return-value
  110.                  (vl-catch-all-apply
  111.                    'vla-open
  112.                    (list objHttp GET&POST host 0)
  113.                  )
  114.           )
  115.         )
  116.       (progn (print (vl-catch-all-error-message return-value))
  117.              nil
  118.       )
  119.       t
  120.     )
  121.   )
  122.   (defun $send$
  123.                 (objHttp db-f header header-vaule content / value
  124.                  err-str seng-zt)
  125.     (vl-catch-all-apply
  126.       'vlax-invoke-method
  127.       (list objHttp
  128.             "setRequestHeader"
  129.             (if        header
  130.               header
  131.               "Content-Length"
  132.             )
  133.             (if        header-vaule
  134.               header-vaule
  135.               ""
  136.             )
  137.       )
  138.     )
  139.     (vl-catch-all-apply
  140.       'vlax-invoke-method
  141.       (list objHttp
  142.             "setRequestHeader"
  143.             "Response-Charset"
  144.             "UTF8"
  145.       )
  146.     )
  147.     (vl-catch-all-apply
  148.       'vlax-invoke-method
  149.       (list objHttp
  150.             "setRequestHeader"
  151.             "DB-Path"
  152.             db-f
  153.       )
  154.     )
  155.     (vl-catch-all-apply
  156.       'vlax-invoke-method
  157.       (list objHttp
  158.             (if        header-vaule
  159.               header-vaule
  160.               "setRequestHeader"
  161.             )
  162.             "CONTENT-TYPE"
  163.             "text/plain"
  164.                                         ; text/xml、application/xml、text/plain、application/x-www-form-urlencoded
  165.       )
  166.     )
  167.     (SETQ value
  168.            (vl-catch-all-apply
  169.              'vlax-invoke-method
  170.              (list objHttp "send" content)
  171.            )
  172.     )
  173.     (if        (vl-catch-all-error-p value)
  174.       (progn (setq err-str (vl-catch-all-error-message value))
  175.              (print err-str)
  176.              (vlax-release-object objHttp) ;释放对象
  177.              (setq seng-zt nil)                ;如果在发送的过程中出现了意外就将zt做空
  178.       )
  179.       (setq seng-zt t)
  180.     )
  181.     seng-zt
  182.   )
  183.   (defun $get-vaule$ (objHttp         array&str  /               array-value
  184.                       chrs         jg            status     str
  185.                       tbl         value-body value-text txt
  186.                      )
  187.     (if
  188.       (and array&str (wcmatch array&str "[,sz,SZ,数组,]"))
  189.        (setq jg (vlax-get-property objHttp 'responsebody))
  190.        (progn
  191.          (and
  192.            (setq value-text
  193.                   (vlax-get-property objHttp 'responseText)
  194.            )
  195.                                         ;直接让系统ado组件返回text格式
  196.            (setq status t)
  197.            (setq jg value-text)
  198.          )
  199.        )
  200.     )
  201.     jg
  202.   )
  203.   (setq        host (strcat (cdr (assoc "IP" lst))
  204.                      ":"
  205.                      (cdr (assoc "端口" lst))
  206.                      "/"
  207.                      (cdr (assoc "接口" lst))
  208.              )
  209.   )
  210.   (setq db-f (cdr (assoc "数据库路经" lst)))
  211.   (setq header (cdr (assoc "报文头" lst)))
  212.   (setq header-vaule (cdr (assoc "报文体" lst)))
  213.   (setq content (cdr (assoc "Sql" lst)))
  214.   (setq GET&POST (cdr (assoc "http方法" lst)))
  215.   (setq array&str (cdr (assoc "返回格式" lst)))

  216.   (OR (AND GET&POST
  217.            (WCMATCH (STRCASE GET&POST) "[,GET,POST,]")
  218.            (SETQ GET&POST (STRCASE GET&POST))
  219.       )
  220.       (SETQ GET&POST "POST")
  221.   )
  222.   (IF (or (not header) (not header-vaule))
  223.     (SETQ header NIL
  224.           header-vaule
  225.            NIL
  226.     )                                        ;防止参数不对
  227.   )
  228.   (SETQ str "")
  229.   (IF (or (setq objHttp (vlax-create-object "Msxml2.ServerXMLHTTP")) ;
  230.           (setq objHttp (vlax-create-object "Msxml2.XMLHTTP"))
  231.       )
  232.     (PROGN
  233.       (setq return-value nil)
  234.       (setq host ($URLencode$ host))
  235.       (if ($open$ objHttp GET&POST host) ;开启
  236.         (PROGN
  237.           (if ($send$ objHttp db-f header header-vaule content) ;发送
  238.             (PROGN
  239.               (while
  240.                 (not
  241.                   (eq (vlax-get-property objHttp "readyState") 4)
  242.                                         ;Response-Charset,readyState
  243.                 )
  244.                  (repeat 500)
  245.               )
  246.               (if (not (= (vlax-get-property objHttp "readyState") 4))
  247.                                         ;如果不等于4
  248.                 (vlax-release-object objHttp) ;释放对象
  249.               )
  250.               (if (= (vlax-get-property objHttp "readyState") 4)
  251.                 (IF (setq jg ($get-vaule$ objHttp array&str))
  252.                   (SETQ status T)
  253.                 )
  254.               )
  255.             )
  256.           )
  257.         )
  258.       )
  259.     )
  260.     (PROGN (ALERT
  261.              "操作系统安装有问题!\n\n无法创建对象\"Msxml2.XMLHTTP\""
  262.            )
  263.            (setq status nil)
  264.     )
  265.   )
  266.   (if objHttp
  267.     (vl-catch-all-error-p
  268.       (vl-catch-all-apply 'vlax-release-object (list objHttp))
  269.                                         ;防止前面没有释放对象
  270.     )
  271.   )
  272.   (if (not status)
  273.     (if        (and array&str (wcmatch array&str "[,sz,SZ,数组,]"))
  274.       ()
  275.       (progn
  276.         (setq jg
  277.                (strcat
  278.                  "(\"success\" . \"false\")"
  279.                  "(\"message\" . \"无法连接到远程数据库\")"
  280.                )
  281.         )
  282.       )
  283.     )
  284.   )
  285.   jg
  286. )



迪杰斯特拉示例:
  1. ;【evaluate_shortest_path】迪杰斯特拉路经计算
  2. (setq str
  3.       "{\"graph\":{\"J17\":{\"J18\": -1,\"J24\": -1,\"J16\": -1,\"S108\": -1},\"J18\":{\"J17\": -1,\"J19\": -10,\"J16\": -40,\"J20\": 175},\"J24\":{\"J17\": -1,\"J16\": -30,\"J19\": -20,\"J25\": 30},\"J16\":{\"J24\": -30,\"J18\": -40,\"J17\": -1,\"J15\": 80},\"J19\":{\"J24\": -20,\"J18\": -10,\"S108\": 1,\"SW06\": 160},\"S108\":{\"J17\": -1,\"J19\": 1},\"SW06\":{\"J19\": 160,\"J28\": 160},\"J53\":{\"J04\": 0,\"J05\": 0,\"J03\": 0},\"J04\":{\"J53\": 0,\"J06\": 200},\"J52\":{\"P09\": 0,\"J51\": 120},\"P09\":{\"J52\": 0},\"J51\":{\"J52\": 120,\"J50\": 190},\"J50\":{\"J51\": 190,\"J46\": 170},\"J46\":{\"J50\": 170,\"J44\": 0},\"J49\":{\"P08\": 0,\"J48\": 0},\"P08\":{\"J49\": 0},\"J48\":{\"J49\": 0,\"J47\": 120},\"J44\":{\"J43\": 0,\"J46\": 0,\"J45\": 0},\"J43\":{\"J44\": 0,\"J42\": 5},\"J42\":{\"J29\": 70,\"J43\": 5},\"J29\":{\"J42\": 70,\"J27\": 0},\"J41\":{\"P07\": 0,\"J40\": 0},\"P07\":{\"J41\": 0},\"J39\":{\"J38\": 0,\"P06\": 0},\"J38\":{\"J39\": 0,\"J37\": 100},\"J37\":{\"J38\": 100,\"J34\": 0},\"J34\":{\"J37\": 0,\"J36\": 0,\"J35\": 0},\"J36\":{\"J34\": 0,\"J40\": 135},\"J33\":{\"J32\": 0,\"P05\": 0},\"J32\":{\"J33\": 0,\"J30\": 300},\"J31\":{\"J35\": 50,\"J27\": 0},\"J35\":{\"J31\": 50,\"J34\": 0},\"J27\":{\"J31\": 0,\"J29\": 0,\"J28\": 0,\"J30\": 0},\"J30\":{\"J32\": 300,\"J27\": 0},\"J28\":{\"J27\": 0,\"SW06\": 160},\"J26\":{\"J25\": 0,\"P04\": 0},\"J25\":{\"J26\": 0,\"J24\": 30},\"J21\":{\"J20\": 0,\"P03\": 0},\"J20\":{\"J21\": 0,\"J18\": 175},\"J14\":{\"J10\": 85,\"J15\": 40},\"J10\":{\"J14\": 85,\"J09\": 0},\"J13\":{\"J12\": 0,\"P10\": 0},\"J12\":{\"J13\": 0,\"J11\": 120},\"J11\":{\"J09\": 0,\"J12\": 120},\"J09\":{\"J11\": 0,\"J10\": 0,\"J08\": 0},\"J08\":{\"J05\": 80,\"J09\": 0},\"J05\":{\"J08\": 80,\"J53\": 0},\"J15\":{\"J14\": 40,\"J16\": 80},\"J03\":{\"J53\": 0,\"J02\": 40},\"J47\":{\"J48\": 120,\"J45\": 210},\"J45\":{\"J47\": 210,\"J44\": 0},\"J40\":{\"J41\": 0,\"J36\": 135},\"P06\":{\"J39\": 0},\"P05\":{\"J33\": 0},\"P04\":{\"J26\": 0},\"P03\":{\"J21\": 0},\"P10\":{\"J13\": 0},\"J07\":{\"P02\": 0,\"J06\": 60},\"P02\":{\"J07\": 0},\"J06\":{\"J07\": 60,\"J04\": 200},\"J02\":{\"J03\": 40,\"J01\": 0},\"J01\":{\"J02\": 0,\"P01\": 0},\"P01\":{\"J01\": 0}}};P08:P10|P08:SW06|P01:P09|P05:P10|P05:P10|P04:P10|P04:P10|P04:P10|P04:P10|P01:P07|P01:P07|P01:P07|P10:S108|P06:S108|P03:S108|P06:SW06|P03:SW06"
  4. )
  5. (setq lj
  6.        ($带有报文头的POST/GET请求$
  7.          (list (cons "IP" "http://127.0.0.1")
  8.                (cons "端口"
  9.                      (vl-registry-read
  10.                        "HKEY_CURRENT_USER\\ZXCAD\\Server_Client\\loc"
  11.                        "port"
  12.                      )
  13.                )
  14.                (cons "接口" "evaluate_shortest_path")
  15.                (cons "数据库路经" "C:\\Changli_harness_software\\SERVER");db数据库的文件夹路经,不是db的路经
  16.                (cons "报文头" "Client-Auth")
  17.                (cons "报文体" (getenv "ComputerName"))
  18.                (cons "Sql" str)
  19.                (cons "http方法" "POST")
  20.                (cons "返回格式" nil)
  21.          )
  22.        )
  23. )
  24. (setq data(read lj))


查询数据库示例
  1. ;【Query】查询数据库所有表单名
  2. (setq str
  3.        "SELECT name FROM sqlite_master WHERE type='table' order by name"
  4. )
  5. (setq str
  6.        ($带有报文头的POST/GET请求$
  7.          (list (cons "IP" "http://127.0.0.1")
  8.                (cons "端口"
  9.                      (vl-registry-read
  10.                        "HKEY_CURRENT_USER\\ZXCAD\\Server_Client\\loc"
  11.                        "port"
  12.                      )
  13.                )
  14.                (cons "接口" "Query")
  15.                (cons "数据库路经" "C:\\Changli_harness_software\\SERVER");db数据库的文件夹路经,不是db的路经
  16.                (cons "报文头" "Client-Auth")
  17.                (cons "报文体" (getenv "ComputerName"))
  18.                (cons "Sql" str)
  19.                (cons "http方法" "POST")
  20.                (cons "返回格式" nil)
  21.          )
  22.        )
  23. )
  24. (setq data (eval (read (strcat "'(" str ")"))))



修改及写入数据库示例
  1. ;【Update】修改数据库的数据
  2. (setq str
  3.        "update user set `手机` = '110' where `用户名` = 'admin'"
  4. )
  5. (setq str
  6.        ($带有报文头的POST/GET请求$
  7.          (list (cons "IP" "http://127.0.0.1")
  8.                (cons "端口"
  9.                      (vl-registry-read
  10.                        "HKEY_CURRENT_USER\\ZXCAD\\Server_Client\\loc"
  11.                        "port"
  12.                      )
  13.                )
  14.                (cons "接口" "Update")
  15.                (cons "数据库路经" "C:\\Changli_harness_software\\SERVER");db数据库的文件夹路经,不是db的路经
  16.                (cons "报文头" "Client-Auth")
  17.                (cons "报文体" (getenv "ComputerName"))
  18.                (cons "Sql" str)
  19.                (cons "http方法" "POST")
  20.                (cons "返回格式" nil)
  21.          )
  22.        )
  23. )
  24. (setq data (eval (read (strcat "'(" str ")"))))







Sqlite_go.part1.rar

3 MB, 下载次数: 22, 下载积分: D豆 -1 , 活跃度 1

Sqlite_go.part2.rar

2.59 MB, 下载次数: 22, 下载积分: D豆 -1 , 活跃度 1

论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!

点击这里给我发消息

已领礼包: 31个

财富等级: 招财进宝

发表于 2020-1-9 21:00:47 | 显示全部楼层
    这个厉害了
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2020-1-9 21:15:26 | 显示全部楼层
(setq str ($带有报文头的POST/GET请求$
            (strcat "http://127.0.0.1:8000" "/" "Update")
            "Client-Auth"
            (getenv "ComputerName")  
            "update 连接器 set `规格` = '99k' where `编码` = '282079-2'";返回接线表里面65535行数据
            "POST"
            nil
          )
)

点评

(setq str ($带有报文头的POST/GET请求$ (strcat "http://127.0.0.1:8000" "/" "Update") "Client-Auth" (getenv "ComputerName") "Update 连接器 set `规格  详情 回复 发表于 2020-1-10 20:41
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 4411个

财富等级: 富可敌国

发表于 2020-1-10 08:39:32 | 显示全部楼层
这个介绍好,可以学习如何将软件关联起来
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2020-1-10 20:41:26 | 显示全部楼层
dcl1214 发表于 2020-1-9 21:15
(setq str ($带有报文头的POST/GET请求$
            (strcat "http://127.0.0.1:8000" "/" "Update")
            "Cli ...

(setq str ($带有报文头的POST/GET请求$
            (strcat "http://127.0.0.1:8000" "/" "Update")
            "Client-Auth"
            (getenv "ComputerName")  
            "Update 连接器 set `规格` = '99k' where `编码` = '282079-2'";更新连接器表中规格
            "POST"
            nil
          )
)
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2020-1-10 20:45:18 | 显示全部楼层

test接口调用示例:
  1. (setq str ($带有报文头的POST/GET请求$
  2.             (strcat "http://127.0.0.1:8000" "/" "test")
  3.             "Client-Auth"
  4.             (getenv "ComputerName")
  5.             ""
  6.             "POST"
  7.             nil
  8.           )
  9. )
返回:
  1. (("dbtype" . "sqlite") ("Error" . "ok") ("状态" . "0") ("版本" . "V2.0") ("time" . "2020-01-10 20:42:19.495253 +0800") ("serverip" . "127.0.0.1") ("serverport" . "8000") ("hostname" . "HXT-20190521YVQ"))


论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2020-1-11 10:06:40 | 显示全部楼层
lisp调用go工具读取远程广域网数据库的标准件
通过GO连接数据库读取标准件.gif
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 8个

财富等级: 恭喜发财

发表于 2020-1-11 10:35:12 | 显示全部楼层
水平太低,看不明白呀
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 86个

财富等级: 招财进宝

发表于 2020-2-6 18:53:57 | 显示全部楼层
水平太低,看不明白呀
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 23个

财富等级: 恭喜发财

发表于 2020-2-16 22:52:48 | 显示全部楼层
可否加入  可以自己指定数据库文件路径  的功能呢?

点评

正在开发,期待我发布  详情 回复 发表于 2020-2-18 10:04
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2020-2-18 10:04:18 | 显示全部楼层
伪书虫86 发表于 2020-2-16 22:52
可否加入  可以自己指定数据库文件路径  的功能呢?

正在开发,期待我发布
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 23个

财富等级: 恭喜发财

发表于 2020-2-18 14:50:17 | 显示全部楼层
dcl1214 发表于 2020-2-18 10:04
正在开发,期待我发布

感谢感谢,搬个小板凳,坐着等
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 23个

财富等级: 恭喜发财

发表于 2020-2-19 15:53:31 | 显示全部楼层
过来瞅瞅,进展到啥地步了啊
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 23个

财富等级: 恭喜发财

发表于 2020-2-21 17:23:28 | 显示全部楼层
给力!!!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复

使用道具 举报

发表于 2020-4-12 01:04:39 | 显示全部楼层
arm64的机器能运行吗?linux

点评

这个是本机运行的,要求go和cad在同一台电脑上  详情 回复 发表于 2020-4-12 09:07
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|申请友链|小黑屋|手机版|Archiver|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )  

GMT+8, 2020-7-11 18:19 , Processed in 0.270216 second(s), 96 queries , Gzip On, WinCache On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表