Results 1 to 2 of 2

Thread: Artikel over webdelphi database?!

  1. #1

    Question Artikel over webdelphi database?!

    Vet artikel.... net wat ik zocht..

    alleen gaat het bij mij fout als ik hier ben...

    Exception: EOleException
    Message: Object or provider is not capable of performing requested operation


    dat is mijn foutmelding...

    het gaat dus over dit stukkie:


    Het enige wat we nu nog moeten doen is de Action en de producer aan elkaar koppelen. Omdat we er toch ook voor moeten zorgen dat de dataset open gaat en weer wordt gesloten doen we dat allemaal in de source. Plaats in de OnAction de volgende code:

    procedure TWebModule1.WebModule1PartsListItemAction(Sender: TObject;
    Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
    begin
    PartsData.Open;
    try
    Response.Content := PartsTableProducer.Content;
    finally
    PartsData.Close;
    end;
    end;



    Dat PartsData is dat nou de ADOConnection1 of de ADOQuery1 ? Bij beide gaat het fout...

    Ik moest wel een connectionstring toevoegen wou ik kunnen editen met die producer:


    Provider=MSDASQL.1;Persist Security Info=False;Extended Properties="DSN=MS Access 97 Database;DBQ=c:\dbdemos.mdb;DefaultDir=c:;DriverId =281;FIL=MS Access;FILEDSN=C:\Program Files\Common Files\ODBC\Data Sources\MS Access 97 Database (not sharable);MaxBufferSize=2048;PageTimeout=5;"


    stond nl. niet in het artikel

    what's wrong?!

  2. #2
    Ik had het ADO gedeelte inderdaad bewust weg gelaten uit het artikel. Het ging een beetje buiten de scope van het artikel en bovendien is de instelling bij iedereen anders. ADO is prachtig als het goed is geïnstalleerd en werkt, maar het is nogal een zoekpartij als het niet werkt.

    PartsData is de query (een TDataSet eindigt bij mij standaard op Data), deze ziet er als volgt uit:
    Code:
    object PartsData: TADOQuery
      Connection = ADOConnection
      CursorType = ctStatic
      Parameters = <>
      SQL.Strings = (
        'select PartNo, '
        '          VendorNo, '
        '          Description, '
        '          OnHand, '
        '          OnOrder, '
        '          Cost, '
        '          ListPrice '
        'from    parts'
        'order by Description')
      Left = 152
      Top = 164
      object PartsDataPartNo: TFloatField
        DisplayLabel = 'ArtikelNr'
        FieldName = 'PartNo'
      end
      object PartsDataVendorNo: TFloatField
        DisplayLabel = 'Leverancier'
        FieldName = 'VendorNo'
      end
      object PartsDataDescription: TWideStringField
        DisplayLabel = 'Omschrijving'
        FieldName = 'Description'
        Size = 30
      end
      object PartsDataOnHand: TFloatField
        DisplayLabel = 'Voorraad'
        FieldName = 'OnHand'
      end
      object PartsDataOnOrder: TFloatField
        DisplayLabel = 'Besteld'
        FieldName = 'OnOrder'
      end
      object PartsDataCost: TFloatField
        DisplayLabel = 'Inkoopprijs'
        FieldName = 'Cost'
        DisplayFormat = '###,##0.00'
      end
      object PartsDataListPrice: TFloatField
        DisplayLabel = 'Verkoopprijs'
        FieldName = 'ListPrice'
        DisplayFormat = '###,##0.00'
      end
    end
    AdoConnection is dan de verbinding naar ADO, die ziet er als volgt uit:
    Code:
    object ADOConnection: TADOConnection
      ConnectionString = 
        'DBQ=<DATABASEPATH>\dbdemos.mdb;DRIVER={Microsoft A' +
        'ccess Driver (*.mdb)}'
      LoginPrompt = False
      Provider = 'MSDASQL.1'
      Left = 56
      Top = 164
    end
    Je ziet dat ik m'n ConnectionString vrij kaal heb gelaten, alleen maar DBQ=<DATABASEPATH>\dbdemos.mdb;DRIVER={Microsoft A' +
    'ccess Driver (*.mdb)}
    , waar je <DATABASEPATH> vervangt door je eigen path. Hierdoor laat je alle overige instellingen aan ADO over. Probeer eens op deze manier of je je dataset kunt openen.
    Marcel

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. Replies: 6
    Last Post: 24-Feb-05, 23:11

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •