[ASP] Keygen.exe oproepen

[Verwijderd]

Goedemorgen,

Ik heb een probleem met een ASP pagina, die een .exe oproept om een code te genereren die dan een code teruggeeft. Het heeft probleemloos gewerkt op mijn PC met IIS, maar op mijn PC op het werk werkt het niet. Alle paden zijn correct, maar hij geeft toch de volgende foutmelding:

Error Type:
Microsoft VBScript runtime (0x800A0035)
File not found
/keyGenerate.asp, line 50

Heb al gegoogeld, maar vind het probleem niet. ASP pagina's werken perfect, maar zodra ik de Keygen wil aanspreken werkt het niet. De post data wordt correct doorgegeven. Als hij zegt regel 50, rekent hij dan witregel mee en zo? Of hoe moet je tellen?

Dit is de ASP pagina:

code:

Function GenerateKey(ProductSerial, UnitID)
  Dim oWshShell
  Dim oFSO
  Dim sFileName
  Dim sPhysicalPath
  Dim sFullPhysicalPath
  Dim sPathFilename
  Dim sCommand
  Dim iResult
  Dim sDeleteFile
  Dim oFile
  Dim sResultText
  
  Set oWshShell = Server.CreateObject("WScript.Shell")
  Set oFSO = Server.CreateObject("Scripting.FileSystemObject")

  sFileName = oFSO.GetTempName
  sPhysicalPath = Request.ServerVariables("APPL_PHYSICAL_PATH")

  sFullPhysicalPath = sPhysicalPath & "Keygen\"

  sPathFilename =  """" & sFullPhysicalPath & sFileName & """"
 
  sCommand = sFullPhysicalPath & "KeyGenConsole.exe" & " " & ProductSerial & " " & UnitID  & " " & sPathFilename
  
  'run the bat file
  iResult = oWshShell.Run(sCommand, 0, TRUE)
  Set oWshShell = Nothing
  
  'the temp file created that has to be deleted after reading result
  sDeleteFile = sFullPhysicalPath & sFileName
  
  Set oFile = oFSO.OpenTextFile(sDeleteFile, 1, FALSE)
  'read the file
  sResultText = oFile.ReadAll
  oFile.Close
  Set oFile = Nothing
  'delete the file
  'oFSO.DeleteFile(sDeleteFile)   
  Set oFSO = Nothing
  strUnlockCode = sResultText
  GenerateKey = sResultText
  
  'if an invalid product serial number or unit ID was entered, the file will contain an error message
  '(Error: Invalid serial number / Error: Invalid unit id)
  'otherwise, the file will contain the product registration key / unlock key.
End Function 
%>

Heb al geprobeerd om het path volledig in te volledig in te vullen, maar geen resultaat, hij zegt dan hetzelfde, maar de fout is dan op regel 44.

C:\Inetpub\wwwroot\

Alvast bedankt!

[Jaspertje]

Het zou fijn zijn als je liet zien wat regel 50 was en niet alles, maar welk bestand kan het niet vinden?

Als je in je editor ctrl+g doet en dan 50 kom je op regel 50 uit. en ja witregels worden meegerekend. Heb je het script wel zelf geschreven?

[ Voor 41% gewijzigd door Jaspertje op 09-12-2005 10:11 ]

[sopsop]

doe eens een response.write van je pad + filename:

code:

sDeleteFile = sFullPhysicalPath & sFileName
response.write sDeleteFile

PS: Je noemt in je titel 'keygen.exe' maar je roept 'KeyGenConsole.exe' aan?!

[ Voor 73% gewijzigd door sopsop op 09-12-2005 10:15 ]

[Verwijderd]

Neen, heb het script niet zelf geschreven. ik sta in voor de PHP, maar mijn collega die de ASP doet is ziek en vandaar dat ik het probleem moet zien op te lossen.
Ik werk alleen met WordPad, CTRL G werkt niet.

Ik ga zometeen die responce.write eens proberen.

//(de Keygen.exe is niet overgenomen van het script om het duidelijker te maken, dus daar ligt het niet aan. Denk eraan dat deze code werkt op een andere PC.)

[ Voor 24% gewijzigd door Verwijderd op 09-12-2005 10:18 ]

[Verwijderd]

boppert schreef op vrijdag 09 december 2005 @ 10:12:
doe eens een response.write van je pad + filename:

code:

sDeleteFile = sFullPhysicalPath & sFileName
response.write sDeleteFile

Zelfde probleem; file not found

//Sorry, het werkt. Hij geeft het goede path aan naar de .tmp die de code bevat.

Dus hij kan het precies niet lezen?

[ Voor 19% gewijzigd door Verwijderd op 09-12-2005 10:32 ]

[SunnieNL]

Stomme vraag misschien,
maar heeft de anonieme internetgebruiker wel rechten op die map
en staat er in IIS ingesteld dat er executables mogen worden gestart?

[Verwijderd]

Alle rechten staan goed.

Wat er nu gebeurd is dat ie het correcte path geeft van de .tmp waar de code instaat:

c:\inetpub\wwwroot\Keygen\rad9E14B.tmp

Dit gebeurt alleen als ik devolgende code weglaat:

code:

Set oFile = oFSO.OpenTextFile(sDeleteFile, 1, FALSE)
  'read the file
  sResultText = oFile.ReadAll
  oFile.Close
  Set oFile = Nothing
  'delete the file
  'oFSO.DeleteFile(sDeleteFile)   
  Set oFSO = Nothing
  strUnlockCode = sResultText
  GenerateKey = sResultText

Die code is voor het uitlezen van die .tmp, maar de fout zit hier dus in...

[Creepy]

Zou je nu misschien eens aan kunnen geven op welke regel precies de code knalt en welke zaken je nu zelf al hebt geprobeerd om het op te lossen? Het komt nu op me over als "dit gaat er mis, hier is m'n script, fix het ff voor me" en dat is hier nu net niet de bedoeling

[Verwijderd]

Zoals reeds gezegd vraag ik gewoon: als hij zegt fout op regel zoveel; hoe moet je dan tellen? In wordpad. Want ik zie echt de fout niet.

[sopsop]

Gewoon in een teksteditor het bestand keygen.asp openen en dan op regel 50. Zo moeilijk is dat toch niet?

[sig69]

Wordpad..
Gebruik dan Textpad of UltraEdit ofzo, heb je in ieder geval syntax highlighting en regelnummers etc.

[Verwijderd]

Ik zit momenteel op een verse installatie van Windows.
Ik heb een hele support site gemaakt met wordpad, dus wat is er nu zo mis wordpad?

Ik zal even een editor downloaden. Maar het kan toch niet dat je niet kan zien in wordpad op welke regel de fout is? Er meot toch een set van regels zijn hoe ASP telt?

[sig69]

Mits automatische regelterugloop uitstaat, begin bovenaan en druk 49x op het pijltje naar beneden. En dat is dus 1 van de dingen die er mis is met wordpad. Wat als je een foutmelding krijgt op regel 356? Dan doe ik liever CTRL+G, 356, enter

[NMe]

Verwijderd schreef op vrijdag 09 december 2005 @ 11:06:
Ik zit momenteel op een verse installatie van Windows.
Ik heb een hele support site gemaakt met wordpad, dus wat is er nu zo mis wordpad?

Gebruik dan Notepad, daar kun je tenminste nog aangeven dat ie naar een bepaalde regel moet springen.

Ik zal even een editor downloaden. Maar het kan toch niet dat je niet kan zien in wordpad op welke regel de fout is? Er meot toch een set van regels zijn hoe ASP telt?

Regel 50 is gewoon de 50e regel van je bestand lijkt me zo?

[Verwijderd]

Dat is in praktijk dus niet zo

Heb nu wel het probleem kunnen isoleren. De keygen maakt de code aan en zet dat in een .tmp file die hij schrijft in de directory van de de keygenerator (permissies zijn in orde).
Dus Keygen.exe maakt bvb een file rad0F2da1.tmp en zet de code daar in en dan leest de ASP code die file uit.

Alleen wordt die .tmp file file niet aangemaakt, en bijgevolg krijg ik dus een file not found.

Probleem moet dus in volgende code zitten:

code:

  Set oWshShell = Server.CreateObject("WScript.Shell")
  Set oFSO = Server.CreateObject("Scripting.FileSystemObject")

  sFileName = oFSO.GetTempName
  sPhysicalPath = Request.ServerVariables("APPL_PHYSICAL_PATH")

  sFullPhysicalPath = sPhysicalPath & "Keygen\"

  'dit is die tmp file me de code in, die nu dus niet wordt geschreven...
  sPathFilename =  sFullPhysicalPath & sFileName
  ...

[NMe]

Druk oFSO.GetTempName eens af?

[Jaspertje]

Verwijderd schreef op vrijdag 09 december 2005 @ 13:57:
Dat is in praktijk dus niet zo

Heb nu wel het probleem kunnen isoleren. De keygen maakt de code aan en zet dat in een .tmp file die hij schrijft in de directory van de de keygenerator (permissies zijn in orde).
Dus Keygen.exe maakt bvb een file rad0F2da1.tmp en zet de code daar in en dan leest de ASP code die file uit.

Alleen wordt die .tmp file file niet aangemaakt, en bijgevolg krijg ik dus een file not found.

Probleem moet dus in volgende code zitten:

Waar in dat stuk code wordt het bestand aangemaakt? En als de permissies on orde zijn, waarom wordt het bestand dan niet aangemaakt?