BrettF Posted August 25, 2009 Share Posted August 25, 2009 I take it you want some sort of copyright protection on a disk? Maybe explain fully what you are doing, and we could work out a way to do it >_< Vist my blog!UDFs: Opens The Default Mail Client | _LoginBox | Convert Reg to AU3 | BASS.au3 (BASS.dll) (Includes various BASS Libraries) | MultiLang.au3 (Multi-Language GUIs!)Example Scripts: Computer Info Telnet Server | "Secure" HTTP Server (Based on Manadar's Server)Software: AAMP- Advanced AutoIt Media Player | WorldCam | AYTU - Youtube Uploader Tutorials: Learning to Script with AutoIt V3Projects (Hardware + AutoIt): ArduinoUseful Links: AutoIt 1-2-3 | The AutoIt Downloads Section: | SciTE4AutoIt3 Full Version! Link to comment Share on other sites More sharing options...
Oraculo Posted August 26, 2009 Author Share Posted August 26, 2009 (edited) 'm customizing a DVD of Windows 7 ... added a startup command in the DVD for it to execute a program ... wanted this program to date verificase DVD burning or real serial number of dvd ... so difficult to copy the same ... because this is a custom dvd hard work of my company, so the officials could not do anything anywhere. Edited August 26, 2009 by Oraculo Link to comment Share on other sites More sharing options...
bolthead Posted August 26, 2009 Share Posted August 26, 2009 someone has more ideas to help me? Not an ideal or guaranteed solution but you could compare the media ID of the disk being used against the original disk using a 3rd party app like Imgburn or something similar. Using Imgburn as an example you could do something like: #Include <string.au3> $ORIG_ID = 'Media ID of your disk' ; 'YUDEN000-T03-00' $Source_Drive = ; Your prefered method of getting the DVD drive letter. $Imgburn_Path = $Source_Drive & '\Path\To\Imgburn.exe' $File = 'C:\DVD_Info.txt' ; Temp file RunWait($Imgburn_Path & ' /MODE READ /SRC ' & $Source_Drive & ' /INFO "' & $File & '" /CLOSEINFO', "", @SW_HIDE) $hFile = FileOpen($File, 0) If $hFile = -1 Then MsgBox(0, "Error", "Unable to open file.") Exit EndIf $Read = FileRead($hFile) ;Parse the file for the media ID of the disk being used $DVD_ID = _StringBetween($Read, 'Disc ID: ', @CRLF) FileClose($hFile) FileDelete($File) ;Check the media ID against the original If $DVD_ID[0] <> $ORIG_ID Then _Pirate() EndIf Func _Pirate() MsgBox(262160, "", "This is not an original disk.") ; do your stuff EndFunc Somebody making a copy could be using the same media as your company, but I would imagine the chances are quite slim. Link to comment Share on other sites More sharing options...
Oraculo Posted August 26, 2009 Author Share Posted August 26, 2009 'll be experimenting with this script of yours ... again thank you all for anteção ... and sorry for my bad English Link to comment Share on other sites More sharing options...
Oraculo Posted August 26, 2009 Author Share Posted August 26, 2009 you know any other program that can provide me such information? because ImgBurn is not possible to run in silent mode. Congratulations on scrip is already a great help ... if someone has another new please post! Link to comment Share on other sites More sharing options...
Oraculo Posted August 26, 2009 Author Share Posted August 26, 2009 bolthead his example was of great help ... would be perfect to read data DVD burning along with the name of the media Link to comment Share on other sites More sharing options...
Oraculo Posted August 27, 2009 Author Share Posted August 27, 2009 boltheadrealize some tests on windows and the script is functional however,ImgBurn not run in winpe environmentyou know another program that runs on winpe environment? Link to comment Share on other sites More sharing options...
Oraculo Posted August 27, 2009 Author Share Posted August 27, 2009 the problem of ImgBurn has been resolved ...more'm having this error message! Link to comment Share on other sites More sharing options...
Oraculo Posted August 27, 2009 Author Share Posted August 27, 2009 the problem of ImgBurn has been resolved ...more'm having this error message! could solve this problem of ImgBurn ...now there's only run ImgBurn with the hidden window ...someone has an idea? Link to comment Share on other sites More sharing options...
WolfWorld Posted August 27, 2009 Share Posted August 27, 2009 have you replace this line? $Source_Drive = ; Your prefered method of getting the DVD drive letter. Main project - Eat Spaghetti - Obfuscate and Optimize your script. The most advance add-on.Website more of GadGets! Link to comment Share on other sites More sharing options...
Oraculo Posted August 28, 2009 Author Share Posted August 28, 2009 have you replace this line?$Source_Drive = ; Your prefered method of getting the DVD drive letter.ok problem solved ... someone here know any other program similar to imgburn .... so I can use it to read media reports dvd Link to comment Share on other sites More sharing options...
bolthead Posted August 28, 2009 Share Posted August 28, 2009 There are other programs that will read the media ID from a disk, but I don’t know of one that accepts command line arguments. A couple are: ADVDInfo (you will need wnaspi32.dll in the same folder for it to work). DVD Identifier. They are both GUI only apps that require user input so you will need to use ControlGetText, ControlRead, etc.. to do what you want. How is using Imgburn failing for you? Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now