iCAx开思工具箱

标题: (KF) 请教KF中DATABASE如何建立以及连结 [打印本页]

作者: aoci72681    时间: 2006-10-29 00:11
标题: (KF) 请教KF中DATABASE如何建立以及连结
请教各位老前辈
如题
再KF中如何与DATABASE连结 并进行搜寻 取值的动作
HELP中的说明 看了不是很懂
好像需藉由ODBC作为通道 连结资料库
还有资料库该如何建立呢?
是不是藉由ACCESS建立呢?
详细过程实在无法理解
希望各位前辈指点一下方向
如果可以的话,希望能有范例档!!
感激不尽

vodka大大,如果方便的话,请您也帮帮忙啰.
作者: vodka    时间: 2006-10-31 02:07
另找一本书关于SQL语言的书看看
作者: YYHSU    时间: 2006-11-9 23:48
這裏有一個完整而詳細的程式範例,請參考,我也會再試作一次
作者: james27    时间: 2006-11-10 14:19
不错呢
虽然看不太懂
不过好像很神喔
作者: YYHSU    时间: 2006-11-20 20:03
請參考以下程式範例,此程式已驗證

#! UGNX/KF 2.0

DefClass: xn_odbc(ug_base_part);

(String Parameter Modifiable) DSN: "Blade Point Data";

(List) SQL: {"SELECT X, Y, Z From Section_A",
             "SELECT X, Y, Z From Section_B",
             "SELECT X, Y, Z From Section_C",
             "SELECT X, Y, Z From Section_D",
             "SELECT X, Y, Z From Section_E"};

(child) DB: {
  Class, ug_odbc_Database;
  dsn, DSN:;
};

(child list) RS: {
  Class, ug_odbc_Recordset;       
  Quantity, Length(SQL;
  database, DB:;
  SQLstatement, nth(Child:Index:, SQL;
};

(Instance Modifiable) TMP: First(RS;


(child list) SPL: {
  Class, ug_spline_thru;
  Quantity, Length(SQL;
  Degree, 3;
  Periodic?, TRUE;
  Points, @{
    StoreValue(nth(Child:Index:, RS, self:, TMP);
    TMP:MoveFirst);
    Loop {
      For $ctr from 1 to 200;
      For $d is TMP:GetRecord);
      For $n is TMP:MoveNext);
      Collect {Point(First($d), Second($d), Third($d))};
    };
  };
};


(child) Blade: {
         Class, ug_thru_curve;
         section, loop{
                   For $num from 1 to Length(SQL;
                   collect {forward,nth($num,SPL};
                 };
         Degree, 3;
         Body_Type, solid;
};
作者: airspace    时间: 2007-4-17 09:11
保留了的哈!
作者: maxdebaba    时间: 2010-5-17 10:13
这个程序还要对话框?




欢迎光临 iCAx开思工具箱 (https://t.icax.org/) Powered by Discuz! X3.3