标签: paradox

我正在处理一个遗留的 VB6 项目，我需要像这样进行 JOIN 调用：

SELECT C.Cnum, C.RealDate, M.Name, R.Price, R.Qnt, R.RealPrice, R.QntP, R.QntR, M.Name
FROM "CHECK" C 
LEFT JOIN "RCHECK" R ON C.Cnum = R.Cnum 
LEFT JOIN "PCHECK" P ON C.Cnum = P.Cnum 
LEFT JOIN "MONEY" M ON P.Curency = M.Sifr 
LEFT JOIN "MENU" MN ON R.Sifr = MN.Sifr 
WHERE C.Cnum > 0 ORDER BY C.Cnum

我"Driver={Microsoft Paradox Driver (*.db )};DriverID=538"用作连接字符串的一部分，但它似乎不支持多个连接！这很奇怪。

任何想法如何解决/解决它？

是的，当我在 Borland Database Desktop 中运行此查询时，它运行良好。

更新 1：

我的VB代码：

Dim Conn As New ADODB.Connection
Dim sConnStr …

我需要从Delphi XE2下的现有Padadox数据库中提取数据(是的,我超过10年将它们分开......).

我需要根据包含以下值的字段(示例中的id)对结果进行排序:'1','2 a','100','1b','50 bis'...并得到:

- 1
- 1 b
- 2 a
- 50 bis
- 100

也许这样的事情可以做到,但那些关键字不存在:

SELECT id, TRIM(TRIM(ALPHA FROM id)) as generated, TRIM(TRIM(NUMBER FROM id)) as generatedbis, etc
FROM "my.db"
WHERE ...
ORDER BY generated, generatedbis

我怎么能用矛盾实现这样的排序......？

我正在尝试将来自Paradox数据库的数据(所有文件*.DB都位于文件夹中)导入到带有SSIS 2008的Sql server 2008.从我的OLE DB源,我使用Jet 4.0 OLE DB提供程序创建了一个新的连接,然后在扩展属性中指定"Paradox 5.0"但是在测试连接时我每次都得到相同的错误:"找不到ISAM驱动程序"任何想法如何解决这个问题？

非常感谢

我正在编写一个必须打开已由第三方保存的预先存在的BDE数据库的应用程序.

在这个应用程序,我现在有一个TDatabase(DriverName:STANDARD)与path集正确Params.
我现在可以设置Connected为true而没有错误消息.

还有一个TTable与DatabaseName集到的TDatabase的值,并TableName设置为.db的文件是位于文件夹中(这个名字被自动填写,我只顶帽子,将其选中).

现在问题是:
如果我设置Active为true,则会出现错误消息,抱怨缺少访问权限C:\PDOXUSRS.NET.
我知道我可以设置另一条路径BDEADMIN,但我需要在我的应用程序中解决这个问题 - 我不能指望每个客户都做这个改变.此外,我有一台运行第三方应用程序的测试机 - 它可以无任何错误地访问数据库,而我的应用程序抛出上述错误.这让我怀疑可能有一种解决方法.

有这样的解决方法吗？
我只需要对数据库的读访问权限.

所以,我前几天在Hacker News上看到了这个:http://web.mit.edu/tee/www/bertrand/problem.html

它基本上表示半径为1的圆上的随机和弦的长度大于3的平方根的概率是多少.

看看它,答案显然是1/3,但对HN的评论让人比我更聪明.https://news.ycombinator.com/item?id=10000926

我不想辩论,但我确实想确保我不是疯了.所以我编码了我认为会证明它是P = 1/3,但我最终得到P~.36.所以,我的代码有些不对劲.

我可以进行健全检查吗？

    package com.jonas.betrand;

    import java.awt.geom.Point2D;
    import java.util.Random;

    public class Paradox {
        final static double ROOT_THREE = Math.sqrt(3);

        public static void main(String[] args) {
            int greater = 0;
            int less = 0;
            for (int i = 0; i < 1000000; i++) {
                Point2D.Double a = getRandomPoint();
                Point2D.Double b = getRandomPoint();

                //pythagorean
                if (Math.sqrt(Math.pow((a.x - b.x), 2) + Math.pow((a.y - b.y), 2)) > ROOT_THREE) {
                    greater++;
                } else {
                    less++;
                } …

我想将Excel中的数据导入到Delphi 7上的Paradox数据库中.

我怎么能用Delphi做到这一点？

我如何能够使用Delphi从某个字符串之后的备忘录字段中删除数据,例如我正在浏览的数据库中的数据如下所示:

<Data I want to keep>

======= Old Data ========
<line 1>
<line 2>
etc.

我怎么能告诉Delphi在旧数据线之后(包括)删除所有数据？但是不要触摸我希望保留的数据？

我正在使用Delphi 7中的搜索查询功能(使用Paradox数据库),并且在两个日期之间选择时,我不断收到类型不匹配错误.如果我使用我得到的日期类型

Project Project1.Exe引发异常类EDBEngineError,消息"表达式中的类型不匹配.".流程停止.'

如果我使用dateTime类型,我得到

Project Project1.Exe引发了异常类EDBEngineError,并显示消息"无效使用关键字".令牌:13？AND行号:8'.流程停止.'

其中13是当时的第一个数字.

这是我的代码:

procedure TForm1.Button1Click(Sender: TObject);
var
  Search1 :string;
  Search2 :string;
  outputveld : string;
  datum : TDateTime;
  datumZoek: TdateTime;
  countmails : integer;
  outfile: textfile;
  Zoek6MaandenTerug: Double;
begin
  Zoek6MaandenTerug := 182.621099;
  datum := tdate(now);
  datumZoek := datum - Zoek6MaandenTerug;
  ShowMessage(DateTimeToStr(Datum));
  ShowMessage(DateTimeToStr(datumZoek));
  Memo1.Lines.Add(DateTimeToStr(Datum));
  //datum := datum- StrToDate('21-4-2004');
  {radio button date controll}

  {//radio button date controll}
  Search1 := Edit1.Text;
  Search2 := Edit2.Text;

  assignfile(outfile,'text\Emails.txt');
  rewrite(outfile);
  outputveld := '';
  countmails := 0;

  {sets up  and executesSQL query(Query1)}
  Query1.close;
  Query1.SQL.Clear; …

我想查看test.db文件,我搜索它的编辑器但没有得到任何一个所以请帮助在编辑器中看到它像sql server一样.

我找到了一些sqlite编辑器,但它不是大多数论坛上的sqlite文件,它说它是一个悖论.db文件.

那我怎么打开它

谢谢

我正在尝试将Dephi 2006项目转换为Delphi 2009(Delphi 2006在Drive C Delphi 2009上是在Drive D上).

在主要表格上有一个DataSource1: TDataSource;和一个Table1: TTable;

在OnFormShow表中,filename设置为:

TableFilename := IncludeTrailingPathDelimiter( MyProfileFolder ) + 'Delphi 2009\Projects\Adirondack Lake Maps\' + 'TITLES.DB';
Table1.Active := False;
Table1.TableName := TableFilename;
Table1.Active := True;

运行应用程序时,我得到:

EDBEngineError-Network Initialization Failed 
Permission Denied
File C:\PDOXUSERS.NET
Directory: c:\

问题:

1. 如何设置PDOXUSERS.NET的正确路径？
2. 这是一个简单的应用程序,它将扫描的湖泊地图存储在数据库中,并在几个字段中显示有关湖泊的信息.
3. 过去我曾经使用过BDE.用于替换BDE的最简单的数据库访问组件是什么？在哪里可以了解更多信息？Delphi 2009现在有很多数据库引擎我不知道从哪里开始.

更多信息我在Vista上运行Delphi 2009.