小弟是个delphi的新手,希望大家多多帮忙。我想往数据库中写数据,用了一个ADOconnection,一个edit控件,一个button控件,当点击button控件时把edit里的内容写到数据库中。这个程序具体该怎么写啊,是不是还需要别的控件啊?

解决方案 »

  1.   

    还需要ADOtable,或者ADOquery控件。ADOconnection只是用来连接数据库的,ADOtable,或者ADOquery才是用来连接表的。ADOquery.FieldByName('字段名').AsString :=edit控件名.Text;
      

  2.   

    Qry_Insert.Close;
        Qry_Insert.SQL.Clear;
        Qry_Insert.SQL.Add('insert into tabel (filed1)values(:filed1)');
        Qry_Insert.ParamByName(filed1).AsString:=Trim(edit.Text);
        Qry_Insert.Prepare;
        Qry_Insert.ExecSQL;
      

  3.   

    先定义ConnectionString
    ADOConnection1.Execute('insert into <tablename> values('''+trim(edit1.text)+''')');或者用AdoQuery1.Field[i].AsString:=Trim(Edit1.Text);
      

  4.   

    可以用adoquery连接adoconnection,绑定datascource,使用dbedit控件,直接就可以保存数据了,
    adoquery.post;提交保存。
      

  5.   

    呵呵
    用ADOTable
    Append
    xx:=xx
    POST搞定http://lysoft.7u7.net
      

  6.   

    用datasource+adoquery
    adoquery.append;
    .
    .
    .
    adoquery.post
      

  7.   

    我用以下这条语句往数据库中写数据,为什么老是报错啊。这样写有什么语法错误吗
    ADOQuery1.FieldByName.AsString('kmdm'):=EDIT1.Text ;
      

  8.   

    这样试试:
        ADOQuery1.Close ;
        ADOQuery1.SQL.Clear;
        ADOQuery1.Parameters.Clear ;
        ADOQuery1.SQL.Text:='insert into 表(字段1, 字段2) values(:m1,:m2)';
        ADOQuery1.Parameters.ParamByName('m1').Value:='a';
        ADOQuery1.Parameters.ParamByName('m2').Value:='b';
    //  showmessage(ADOQuery1.SQL.Text);
        ADOQuery1.ExecSQL;
        ADOQuery1.Close;
      

  9.   

    建立的数据库表为 student(sno,sname)时,如果要向数据库中写入数据
    方法1:使用TADOTable
    1、设置ADOTable1的ConnectionString属性——》链接数据库;
    2、设置ADOTable1的TableName属性为student;
    3、编写Button组件的单击事件,代码为:
        ADOTable1.Append;
        ADOTable1.FieldByName('sno').AsString:=Edit1.Text;
        ADOTable1.FieldByName('sname').AsString:=Edit2.Text;
        ADOTable1.Post;

        ADOTable1.Append;
        ADOTable1.Fields[0].AsString:=Edit1.Text;
        ADOTable1.Fields[1].AsString:=Edit2.Text;
        ADOTable1.Post;

        ADOTable1.Append;
        ADOTable1.FieldValues['sno']:=Edit1.Text;
        ADOTable1.FieldValues['sname']:=Edit2.Text;
        ADOTable1.Post;方法2:使用TADOQuery
    1、设置ADOQuery1的ConnectionString属性——》链接数据库;
    2、编写Button组件的单击事件,代码为:
       ADOQuery1.Close;
       ADOQuery1.SQL.Clear;
       ADOQuery1.SQL.ADD('Insert into student values(:no,:name)');
       ADOQuery1.Parameters[0].Value:=Edit1.Text;
       ADOQuery1.Parameters[1].Value:=Edit2.Text;
       ADOQuery1.Prepared;
       ADOQuery1.Open;方法3:使用TADOConnection和TADODataSet
    1、设置ADOConnection1的ConnectionString属性——》链接数据库;
    2、设置ADODataSet1的Connection为ADOConnection1;
    3、设置ADODataSet1的CommandType的值为cmdTable;同时设置ADODataSet1的CommandText为数据库表
       Student;
    4、编写Button组件的单击事件,代码为:
        ADODataSet1.Append;
        ADODataSet1.FieldByName('sno').AsString:=Edit1.Text;
        ADODataSet1.FieldByName('sname').AsString:=Edit2.Text;
        ADODataSet1.Post;

        ADODataSet1.Append;
        ADODataSet1.Fields[0].AsString:=Edit1.Text;
        ADODataSet1.Fields[1].AsString:=Edit2.Text;
        ADODataSet1.Post;

        ADODataSet1.Append;
        ADODataSet1.FieldValues['sno']:=Edit1.Text;
        ADODataSet1.FieldValues['sname']:=Edit2.Text;
        ADODataSet1.Post;等等......