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://www.icax.org/)