Results 1 to 7 of 7

Thread: Parameters MySql Corelab

  1. #1

    Parameters MySql Corelab

    Hallo,

    Kan iemand mij vertellen hoe ik IN CODE
    een parameter kan doorgeven in delphi 8
    ik gebruik de bdp componenten met corelab bdp.
    met een mysql database

    BdpCommand1.CommandText:=
    'INSERT INTO WebEcoLeden ' +
    '(Naam, EMail, Certificaat, Telefoon, Bijzonderheden) ' +
    ' VALUES (,"N0", "N1", "N2", "N3")';


    Parameters.Add( ????

    Alvast bedankt

  2. #2
    TCustomBuild Rob Bos's Avatar
    Join Date
    Jan 2003
    Location
    Eindhoven
    Posts
    4,213
    Ik ga ervan uit dat het op dezelfde manier gaat als onder D7 en eerder :
    '
    Code:
    CommandText := ''INSERT INTO WebEcoLeden (Naam, EMail, Certificaat, Telefoon, Bijzonderheden) Values (:n0, :n1, :n2, :n3, :n4)';
    ParamByName('n0') := Waarde1;
    ParamByName('n1') := Waarde2;
    ParamByName('n2') := Waarde3;
    enz.

  3. #3

  4. #4
    Bedank voor je reactie

    Ik vond een constructie die ongeveer zo eruit ziet,
    maar ik gebruik geen OleDbType.

    Parameters.Add('@Naam', OleDbType.Char, 30, Naam);

    andere suggesties ??

  5. #5
    SillyMember
    Join Date
    May 2003
    Location
    Gent
    Posts
    7,725
    Ik ken corelab BDP componenten niet, maar bij de reguliere CoreLab.mySQL .NET componenten is dat zoiets:
    Code:
    mySqlCommand.Parameters.Add(
      'Koekoek', CoreLab.MySql.MySQltype.Char, 30, 'Koekoek');
    All methodologies are based on fear. -- Kent Beck.

  6. #6
    Dit is uiteindelijk de werkende code:
    Code:
    var
     pNaam, pEMail, pTelefoon,
     pCertificaat, pBijzonderheden: BdpParameter;
    
     CommandText:=
     'INSERT INTO WebEcoLeden ' +
     '(Naam, EMail, Certificaat, Telefoon, Bijzonderheden) ' +
     ' VALUES (?, ?, ?, ?, ?)'; // vraagtekens zijn de variablen
    
      pNaam:= BdpParameter.Create('@Naam', bdptype.String);
      pNaam.Value:= TObject(TextBox_Naam.Text);
      Parameters.Add(pNaam);
    
      pEMail:= BdpParameter.Create('@EMail', bdptype.String);
      pEMail.Value:= TObject(TextBox_EMail.Text);
      Parameters.Add(pEMail);
    
      pCertificaat:= BdpParameter.Create('@Certificaat', bdptype.String);
      pCertificaat.Value:= TObject(DropDownList_Certificaat.SelectedValue);
      Parameters.Add(pCertificaat);
    
      pTelefoon:= BdpParameter.Create('@Telefoon', bdptype.String);
      pTelefoon.Value:= TObject(TextBox_Telefoon.Text);
      Parameters.Add(pTelefoon);
    
      pBijzonderheden:= BdpParameter.Create('@Bijzonderheden', bdptype.String);
      pBijzonderheden.Value:= TObject(TextBox_Bijzonderheden.Text);
      Parameters.Add(pBijzonderheden);
    Last edited by Dees; 25-Oct-04 at 23:14.

  7. #7

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Replies: 26
    Last Post: 05-Oct-04, 23:13
  2. deploy MySQL via win98/xp linux
    By boudewijn in forum Databases
    Replies: 7
    Last Post: 03-Dec-03, 01:55
  3. MySQL login only
    By El Jeffroz in forum Databases
    Replies: 4
    Last Post: 23-Dec-02, 00:14

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
  •