MS 액세스 업데이트 SQL Null이지만 비어있다! (날짜 및 숫자 필드!)

Question

날짜 및 시간 필드 형식이 mm/dd/yyyy가되도록 마스크가 적용된 몇 가지 컨트롤이 있습니다. 양식에로드되는 필드 중 일부는 원본 테이블에서 비어 있으므로 SQL을 실행할 때 본질적으로 잘못된 것인가를 확인합니다. ''또는 Null을 확인합니다. as '는 날짜 번호의 텍스트로 실패하고 필드는 실제로 비어 있지 않습니다.

 strSQL4 = "UPDATE [tblDetails] SET " & _ 
      "[Proposed] = IIF(IsNull(" & Forms!frmEdit.txtProposed.Value & "),0," & Forms!frmEdit.txtProposed.Value & "), " & _ 
      "[Multi] = IIF(IsNull(" & Forms!frmEdit.txtMulitplier.Value & "),0," & Forms!frmEdit.txtMulitplier.Value & "), " & _ 
      "[Rational] = '" & Forms!frmEdit.txtRational.Value & "' " & _ 
      " WHERE [RNumber] = '" & Forms!frmEdit.cmbUpdate.Value & "'" 
      Debug.Print strSQL4 
     dbs.Execute strSQL4 

오류는 쿼리 식 에서 기능을 사용 인수 3075 수가 잘못 'IIF (ISNULL(), 0,'

또한 자체가 다른 사이트에서 제시 한 필드를 입력 시도

 strSQL4 = "UPDATE [tblDetails] SET " & _ 
      "[Proposed] = IIF(" & Forms!frmEdit.txtProposed.Value & "='',[Proposed]," & Forms!frmEdit.txtProposed.Value & "), " & _ 
      " WHERE [RNumber] = '" & Forms!frmEdit.cmbUpdate.Value & "'" 
      Debug.Print strSQL4 
     dbs.Execute strSQL4 

동일한 오류 3075 'IIF (IsNull(), 0, [ProposedHrs]'

*** 또한 IIF를 사용하면 실패합니다. IsNull 메서드는 = ''

필자는 실패한 날짜의 예를 붙여 넣지 않았지만 같은 생각으로 null이 아니지만 공백이지만 다시 공백으로 다시 업데이트되거나 어쩌면 건너 뛰는 것처럼 보입니까?

미리 감사드립니다.

업데이트 - 1 시도에서 에릭 폰 Asmuth 코드 < - 감사합니다 btw! 예상 : 표현

업데이트-2 : 나는 첫 번째 줄에 업데이트를 이동

Set qdf = db.CreateQueryDef("", & _ 
      "UPDATE [tblDetails] SET " & _ 
      "[Proposed] = @Proposed, " & _ 
      "[Multi] = @Multi, " & _ 
      "[Rational] = @Rational " & _ 
      "WHERE [RNumber] = @RNumber") 

이 부분은 모든 빨간색과 최초의 "&는" 컴파일 오류 알림 창을 닫은 후 강조된다 그것은 작동하는 것 같습니다. 설정 QDF = db.CreateQueryDef ("", "UPDATE [tblDetails] SET"& _

내가 옆에있는 날짜 필드에이 방법을 시도하기 위하여려고하고있다

업데이트-3.과 같은 파라미터를 시도 할 때 99/99/0000으로 마스크 된 텍스트 상자; 0; _ 컬렉션에 항목이 없습니다. 몇 번이나 맞춤법을 검사했는데 모든 것이 정상적으로 보입니다. 다음 세 가지 형식을 시도 했으므로 DateRcvd 매개 변수를 설정하십시오. ? 날짜가 텍스트 상자에 대한 올바른

qdf.Parameters("@DateRcvd") = IIf(Nz(Forms!frmEdit.txtDateRcvd.Value) = "", 0, Forms!frmEdit.txtDateRcvd.Value) 
qdf.Parameters("@DateRcvd") = IIf(IsNull(Forms!frmEdit.txtDateRcvd.Value), 0, Forms!frmEdit.txtDateRcvd.Value) 
qdf.Parameters("@DateRcvd") = IIf(Forms!frmEdit.txtDateRcvd.Value = "", 0, Forms!frmEdit.txtDateRcvd.Value) 

업데이트-4 :

Dim qdf2 As DAO.QueryDef 
Set db = CurrentDb 
Set qdf2 = db.CreateQueryDef("", "UPDATE [tblDetails] SET " & _ 
      "[DateReceived] = @DateRcvd " & _ 
      "WHERE [RNumber] = @RNumber") 
      qdf.Parameters("@DateRcvd") = IIf(Nz(Forms!frmEdit.txtDateRcvd.Value) = "", 0, Forms!frmEdit.txtDateRcvd.Value) 
      qdf.Parameters("@RNumber") = Forms!frmEdit.cmbUpdate.Value 
      qdf2.Execute 

텍스트 상자 txtDateRcvd에는 입력란 99/99/0000; 0; _이 텍스트 상자의 속성 내에 설정되어 있습니다.

Answer 1

당신은 빈 문자열을 설명하고, VBA에서 대신 SQL의 IIF 문 그렇게해야 더 나은 아직

 strSQL4 = "UPDATE [tblDetails] SET " & _ 
     "[Proposed] = " & IIF(Nz(Forms!frmEdit.txtProposed.Value) = "",0, Forms!frmEdit.txtProposed.Value) & ", " & _ 
     "[Multi] = " & IIF(Nz(Forms!frmEdit.txtMulitplier.Value) = "",0, Forms!frmEdit.txtMulitplier.Value) & ", " & _ 
     "[Rational] = '" & Forms!frmEdit.txtRational.Value & "' " & _ 
     " WHERE [RNumber] = '" & Forms!frmEdit.cmbUpdate.Value & "'" 

또는, 그것을 제대로 할 당신이 이런 종류의를 얻을 수 있도록 전체 업데이 트를 매개 변수화 오류 또는 SQL 주입.제대로 작업을 수행하는 방법의

예 :

Dim db As DAO.Database 
Dim qdf As DAO.QueryDef 
Set db = CurrentDb 
Set qdf = db.CreateQueryDef("", _ 
    "UPDATE [tblDetails] SET " & _ 
    "[Proposed] = @Proposed, " & _ 
    "[Multi] = @Multi, " & _ 
    "[Rational] = @Rational " & _ 
    "WHERE [RNumber] = @RNumber" 
) 
qdf.Parameters("@Proposed") = IIF(Nz(Forms!frmEdit.txtProposed.Value) = "",0, Forms!frmEdit.txtProposed.Value) 
qdf.Parameters("@Multi") = IIF(Nz(Forms!frmEdit.txtMulitplier.Value) = "",0, Forms!frmEdit.txtMulitplier.Value) 
qdf.Parameters("@Rational") = Forms!frmEdit.txtRational.Value 
qdf.Parameters("@RNumber") = Forms!frmEdit.cmbUpdate.Value 
qdf.Execute 

[? 문에 삽입에서 구문 오류 - 오류 무엇]의