2017-07-13 13 views
-6

こんにちは、私はMSACCESSコードを持っています。私はSQL(SSMS)に変換したいのですが、下のコードを参照してください。MSACCESS CODEをSQLに変換

Private Sub updateDuplicateNetwork() 
Dim rstTemp As DAO.Recordset 
Dim rst As DAO.Recordset 
Dim strPIN As String 
Dim strContract As String 
Dim strNetwork As String 
Set rstTemp = CurrentDb.OpenRecordset("qry_HR_temp_Consultant_Data_DuplicateNetwork_EachValue") 
Set rst = CurrentDb.OpenRecordset("tbl_HR_Contract_Detail") 
If Not rstTemp.EOF Then 
    rstTemp.MoveFirst 
    Do While Not rstTemp.EOF 
     If rstTemp!strNetwork <> strNetwork Or rstTemp!strNetwork <> strNetwork Or rstTemp!strNetwork <> strNetwork Then 
      strPIN = rstTemp!strPIN 
     strContract = rstTemp!strContract 
     strNetwork = rstTemp!strNetwork 
     rst.FindFirst ("[SAP_PIN] = '" & strPIN & "' AND [Contract] = '" & strContract & "' AND [Network] = '" & strNetwork & "'") 
     If Not rst.NoMatch Then 
       rst.Edit 
       rst!Allocated_Hrs = rstTemp!F38 
       rst.Update 
     End If 
     Else 
     rst.FindNext ("[SAP_PIN] = '" & strPIN & "' AND [Contract] = '" & strContract & "' AND [Network] = '" & strNetwork & "'") 
     If Not rst.NoMatch Then 
      rst.Edit 
      rst!Allocated_Hrs = rstTemp!F38 
      rst.Update 
     End If 
     End If 
     rstTemp.MoveNext 
    Loop 
End If 
    Set rst = Nothing 
    Set rstTemp = Nothing 
End Sub 

私は本当に

答えて

0

はあなたが何をしているかこれはあなたに感謝助けが必要?

UPDATE qry_HR_temp_Consultant_Data_DuplicateNetwork_EachValue 

INNER JOIN tbl_HR_Contract_Detail ON 
    qry_HR_temp_Consultant_Data_DuplicateNetwork_EachValue.SAP_PIN = tbl_HR_Contract_Detail.SAP_PIN 
    AND qry_HR_temp_Consultant_Data_DuplicateNetwork_EachValue.Contract = tbl_HR_Contract_Detail.Contract 
    AND qry_HR_temp_Consultant_Data_DuplicateNetwork_EachValue.Network = tbl_HR_Contract_Detail.Network 

SET tbl_HR_Contract_Detail.Allocated_Hrs = qry_HR_temp_Consultant_Data_DuplicateNetwork_EachValue.F38; 

あなたはSAP_PINContractNetworkが等しいF38Allocated_Hrsを設定しますか? SAP_PIN,ContractおよびNetworkは、qry_HR_temp_Consultant_Data_DuplicateNetwork_EachValueで一意に組み合わされていますか?

+0

こんにちは、私は実際にVBコードがここで何をしているのかよく分かりません。私はそれをSQLに変換する必要があります。私は研究していたので、それをSQLに変換することは非常に不可能だと思っています。 これはVBのコードをC#に変換することです。 VBを変換するサイトC#へのコード? – NiCz

+0

私の答えをテストしましたか?私は同じ結果を示していると確信しています。あなたはこのコード部分をc#に変換して実行することはできません。あなたは、少なくともいくつかのマイナーなコーディングスキルが必要な完全なアプリケーションまたはライブラリが必要です。あなたの状況を説明するなら、おそらく他の解決策があります。 – BitAccesser

+0

こんにちは..私はそれをテストしましたが、これは期待された出力です場合は、私は確かに動作していません..最初に尋ねる必要があります...ありがとう非常に – NiCz

関連する問題