excel 데이터 출처 증빙서류와 암컷 증빙서류 간의 관련
관련 코드:
Dim strFiledAndValue0(0) As String
strFiledAndValue0(0) = "BILL_TEMPLATE_PATH〓" & sVBills
DBBase.AppDB.UpdateData(sysParams, "TBILL", "bill_id", sBill_ID, False, strFiledAndValue0)
Dim sUpdate As String = "update TBILL set BILL_TEMPLATE_PATH='" & sBill_ID & "' where bill_id in (" & sVBills & ")"
DBBase.AppDB.getDataSet(sysParams, sUpdate) Dim sSql As String = "select BILL_TEMPLATE_PATH from TBILL where bill_id='" & mBillID & "')"
Dim ds As DataSet = DBBase.AppDB.getDataSet(sysParams, sSql)
If ds.Tables(0).Rows.Count > 0 Then
Dim dr As DataRow = ds.Tables(0).Rows(0)
If dr.Item("BILL_TEMPLATE_PATH").ToString.IndexOf("'") > -1 Then
Dim sUpdate As String = "update TBILL set BILL_TEMPLATE_PATH='' where bill_id in (" & dr.Item("BILL_TEMPLATE_PATH").ToString & ")"
DBBase.AppDB.getDataSet(sysParams, sUpdate)
End If
End If본고는 "덕윤 소프트웨어 개발"블로그에서 나왔습니다. 전재 사절!
이 내용에 흥미가 있습니까?
현재 기사가 여러분의 문제를 해결하지 못하는 경우 AI 엔진은 머신러닝 분석(스마트 모델이 방금 만들어져 부정확한 경우가 있을 수 있음)을 통해 가장 유사한 기사를 추천합니다:
Excel Grep toolExcel Grep tool ■히나가타 ■ 시트 구성 ExcelGrep.cls...
텍스트를 자유롭게 공유하거나 복사할 수 있습니다.하지만 이 문서의 URL은 참조 URL로 남겨 두십시오.
CC BY-SA 2.5, CC BY-SA 3.0 및 CC BY-SA 4.0에 따라 라이센스가 부여됩니다.
좋은 웹페이지 즐겨찾기
