Exécuter la commande SQLLDR avec vb.net

Version imprimable

Bonjour,

Je voudrai exécuter la commande SQLLDR avec .net

Code:

1
2
3
4
5
6
7
Dim startInfo As ProcessStartInfo
        Dim pStart As New Process()
        pStart = New Process()
        startInfo = New ProcessStartInfo("C:\\oracle\\product\\10.2.0\\client_1\\BIN\\sqlldr.exe", " user/pwd@schema control=c:\\oracle\\sqlloader\\job.ctl LOG=c:\\oracle\\sqlloader\\job.log")
        pStart.StartInfo = startInfo
        pStart.Start()
        pStart.WaitForExit()

malgré que la commande tourne bien sur cmd

J'ai essayé avec ce code

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 Dim pp As New System.Security.SecureString
            pp.AppendChar("x")
            pp.AppendChar("x")
            pp.AppendChar("x")
            pp.AppendChar("x")
            Dim batpath As String
            batpath = "c:\test.bat"
            Dim process As New Process
            process.StartInfo.FileName = batpath
            process.StartInfo.CreateNoWindow = True
            process.StartInfo.UserName = "Administrateur"
            process.StartInfo.Password = pp
            process.StartInfo.UseShellExecute = False
            process.Start()
            process.WaitForExit()

mais rien ne se fait, malgré que je n'ai pas reçu d'erreurs

qq a un avis?

J'ai fais comme ça maintenant
Code:

1 2 3 4 5 6 7 8 9 Dim cmd As String cmd = "C:\oracle\product\10.2.0\client_1\BIN\sqlldr USERID=user/pwd@schema CONTROL=c:\oracle\sqlloader\job.ctl LOG=c:\oracle\sqlloader\job.log " ' ******* Lancement de la commande Dim retour As Integer retour = WshShell.Run(cmd, 0, True) Response.Write(retour.ToString) WshShell = Nothing
le problème que le retour est égale à 4
j'ai mis dans cmd, un fichier .bat qui copie un fichier d'une répertoire à un autre et ça marche nickel
est ce que quelqu'un connait comment analyser le retour (4) du run?

Merci

solution :ptdr:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Dim proc As New Process
 
            Dim mycommand As String
            mycommand = "CMD.EXE"
 
            proc.StartInfo = New ProcessStartInfo(mycommand)
            proc.StartInfo.Arguments = "/c SQLLDR user/pwd@schema CONTROL=C:\oracle\sqlloader\job.ctl LOG=C:\oracle\sqlloader\job.log"
            proc.StartInfo.RedirectStandardOutput = True
            proc.StartInfo.RedirectStandardError = True
            proc.StartInfo.UseShellExecute = False
            proc.StartInfo.WorkingDirectory = "C:\oracle\sqlloader"
            proc.Start()
            proc.WaitForExit()
If proc.ExitCode = 0 Then
                Response.Write("insertion faite")
 
            Else
                Response.Write(proc.StandardError.ReadToEnd)
            End If