0

次のコードはvbscriptで記述されており、現在VisualBasicに変換中です。

次の行If Right(LCase(oFile.Name), 3) = "pdf" Thenで、次のエラーが発生します。値が割り当てられる前に変数「Right」が使用されています。実行時にnull参照例外が発生する可能性があります。また、オブジェクト変数またはブロック変数が設定されていないことも言います。

私の知る限り、ファイル名が正しい3文字が「pdf」であることを確認していると思いますか？

For Each oFile In oFolder.Files
        If Right(LCase(oFile.Name), 3) = "pdf" Then

            Data = Replace(oFile.name, ".pdf", "")
            Data = Replace(oFile.name, ".PDF", "")

            Data = Split(Data, "-")
            acct = Data(1)
            lob = Data(2)

            fileName = clientid & "-" & acct & "-" & lob & "-" & speciesid & "-" & seq & ".pdf"

            outputLine = acct & "," & speciesid & "," & lob & "," & oFile.Name & "," & inputDate

            oOutFile.WriteLine(outputLine)

        End If
    Next
4

1 に答える 1

1

あなたが置く必要があります：

Imports Microsoft.VisualBasic

プログラムの開始時に。「右」はこの名前空間の関数です。

http://msdn.microsoft.com/en-us/library/dxs6hz0a(v=vs.80).aspx

于 2012-04-12T16:13:52.647 に答える