아래는 웹서버어플리케이션의 업데이트문의 일부입니다.
업데이트가 안되고 자꾸 예외가 발생하는 이유를 알려주시면 정말 감사하겠습니다.
----------------------------------------------------------------
try
query1.DataBaseName := 'D:HYUNJINisAPIUPdate';
query1.Open;
// response.Content :='쿼리오픈됨'+'
' ;
with Request.QueryFields do
begin
with Query1 do
begin
SQL.Clear ;
SQL.Add('Update updateP.dbf set USERNAME=:USERNAME, version=:version, UpdateTime=:UpdateTime, Active=:Active where USERIP=:USERIP');
Prepare;
parambyname('USERIP').AsString := Request.QueryFields.Values['USERIP'];
parambyname('USERNAME').AsString := Request.QueryFields.Values['USERNAME'];
parambyname('version').AsString := Request.QueryFields.Values['version'];
parambyname('UpdateTime').AsString := Request.QueryFields.Values['UpdateTime'];
parambyname('Active').AsString := Request.QueryFields.Values['Active'];
ExecSQL;
close;
end;
end;
except
Response.Content := '업데이트안 됨
'; ;
end;
> 아래는 웹서버어플리케이션의 업데이트문의 일부입니다.
> 업데이트가 안되고 자꾸 예외가 발생하는 이유를 알려주시면 정말 감사하겠습니다.
> ----------------------------------------------------------------
>
> try
> query1.DataBaseName := 'D:HYUNJINisAPIUPdate';
> query1.Open;
> // response.Content :='쿼리오픈됨'+'
' ;
> with Request.QueryFields do
> begin
> with Query1 do
> begin
> SQL.Clear ;
> SQL.Add('Update updateP.dbf set USERNAME=:USERNAME, version=:version, UpdateTime=:UpdateTime, Active=:Active where USERIP=:USERIP');
> Prepare;
> parambyname('USERIP').AsString := Request.QueryFields.Values['USERIP'];
> parambyname('USERNAME').AsString := Request.QueryFields.Values['USERNAME'];
> parambyname('version').AsString := Request.QueryFields.Values['version'];
> parambyname('UpdateTime').AsString := Request.QueryFields.Values['UpdateTime'];
> parambyname('Active').AsString := Request.QueryFields.Values['Active'];
> ExecSQL;
> close;
> end;
> end;
>
> except
> Response.Content := '업데이트안 됨
'; ;
> end;
>
얼핏봐선 잘못된곳이 없는것 같은데..
Update 나 Insert 시에는 파라메터의 데이터 타입이 동일해야 합니다.
따라서 필드가 모두 char 형이 아니면 에러가 날수도 있겠네요..
그리고 어떤에런지 알려주시면 많은 분들이 답을 알켜 줄거 같은데여~