| |||||||
| Commercial message | |
| | |
|
![]() |
| | Thread Tools |
| | #1 (permalink) |
| New on Forum Join Date: May 2004 Location: Moscow
Posts: 4
| So mistical =8/ I can't understand that: If i use NEROCMD for write multisession dvd - then all work fine, but if i use neroCOM - worked not fully. When i write on blank dvd+rw disc first session - all ok, but when i try write next session on that disk - i get stop with result "Disk Is Not Empty". Why? Soft Version: Nero 6.3.1.6 My comand line for nerocmd and some most part of source code for neroCOM here (if someone will be need some other part of that code for understanding - post me): 1) Nerocmd: nerocmd --write --real --drivename "i" --detect_non_empty_cdrw --recursive --dvd --iso "test" c:\test1.txt nerocmd --write --real --drivename "i" --detect_non_empty_cdrw --import --recursive --dvd --iso "test" c:\test2.txt 2) NeroCom: Private Sub Form_Initialize() Dim myIndex As Integer Set Nero = New Nero NeedSpace = 0 pgs_progress1.Value = 0 lst_Messages.Clear Set Drives = Nero.GetDrives(NERO_MEDIA_DVD_P_RW) lst_Messages.AddItem "Get DVD Devices" For myIndex = 0 To Drives.Count - 1 lst_AvailableDevices.AddItem Drives(myIndex).DeviceName, myIndex Next lst_AvailableDevices.ListIndex = 1 Set Drive = Drives(lst_AvailableDevices.ListIndex) Set Folder = New NeroFolder ErrHandler: Exit Sub End Sub Private Sub cmd_Burn_Click() Dim Source_Dir As String Dim X As Boolean Dim temp Dim FSO As New FileSystemObject Dim DateFolder As NeroFolder Dim ObjCDInf As NEROLib.INeroCDInfo Source_Dir = "C:\temp1" lst_Messages.Clear cmd_Abort.Enabled = True cmd_Burn.Enabled = False Set DateFolder = New NeroFolder Set isotrack = New NeroISOTrack Dim Y As Long DriveFinished = False Call GetInfo While Not DriveFinished Y = DoEvents() Wend For ImpIsoCount = 0 To NumExistingTracks - 1 DriveFinished = False Drive.ImportIsoTrack ImpIsoCount, NERO_IMPORT_ISO_ONLY While Not DriveFinished Y = DoEvents() Wend Next DateFolder.Name = "REBUS BACKUP " + Format(Now, "YYYY_MM") ' + "(" + Trim$(CInt(Rnd * 1000)) + ")" Folder.Folders.Add DateFolder If edtFileName.Text = "" Then Call BuildFileFolderTree(DateFolder, FSO.GetFolder(Source_Dir)) Else Call BuildFileTree(DateFolder, edtFileName.Text) End If lst_Messages.AddItem "Check Requred space on disk" If FreeSpace < (NeedSpace + 5000) / 1000 Then lst_Messages.AddItem "Check space if failed!" Exit Sub Else lst_Messages.AddItem "Check space is done" End If If lst_Messages.ListCount <> 0 Then lst_Messages.ListIndex = lst_Messages.ListCount - 1 lst_Messages.Refresh End If isotrack.Name = "Rebus Backup CD" isotrack.Copyright = "SH MICEX" isotrack.Application = "Rebus 3" isotrack.RootFolder = Folder isotrack.BurnOptions = NERO_BURN_OPTION_CREATE_ISO_FS + NERO_BURN_OPTION_USE_JOLIET + NERO_BURN_OPTION_USE_MODE2 Drive.BurnIsoAudioCD "SH MICEX", "Rebus Backup", 0, isotrack, Nothing, Nothing, NERO_BURN_FLAG_WRITE + NERO_BURN_FLAG_BUF_UNDERRUN_PROT + NERO_BURN_FLAG_CLOSE_SESSION, 0, NERO_MEDIA_DVD_P_RW End Sub |
| | |
| | #3 (permalink) |
| New on Forum Join Date: May 2004 Location: Moscow
Posts: 4
| Re: So mistical =8/ Yes, i have - i use Drive_OnDoneImport2. But what the link event of imoprting prev session data and event "Disk Is Not Empty". May be i don't understand something? P.S. -Matze, i must get info about prev session with some different method? ![]() Matze , please, help me if you can... ![]() |
| | |
| | #5 (permalink) |
| New on Forum Join Date: May 2004 Location: Moscow
Posts: 4
| Re: So mistical =8/ May be, Matze, but why with CD-R/RW disk that code work fine, and with DVD+R/DVD+RW when i try to record next session on disk i catch "Disk Is Not Empty"? I mean, what if problem in importing, then i can see only last session data, but not "Disk Is Not Empty" status on disk. I'm not right? P.S. - Matze, may be i send you my source code fully on your mail? ![]() |
| | |
| |
| |
![]() |
| Bookmarks |
| Thread Tools | |
| |