Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
This is the first time I saw this one.
Message
De
01/04/2005 19:30:00
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 8 SP1
OS:
Windows XP SP2
Network:
Windows 2000 Server
Database:
Visual FoxPro
Divers
Thread ID:
01000851
Message ID:
01000914
Vues:
16
Check Error message when you install or start an MS-DOS or 16-bit Windows-based program mskb #324767

>Here are the symptoms:
>
>I run my code:
>A black window named FOXRUN.PIF opens
>Then a message box that tells me:
>The path to the pif and
>C:\Windows\system32\autoexec.nt and
>The system file is not suitable for running MSDOS and Windows Applications.
>
>I cannot see anything wrong with my code and I have restarted my computer and re-run the code with the same result.
>


--------------------------------------------------------------------------------
Hi Sergy:

My code is all windows VFP 8 SP1. It is not dos and has nothing to do with loading a CD. Here is the bit of code that seems to cause the problem.
Dummy = 0
lnHandle = Fcreate("PartOne.prg",0)
Fputs(lnHandle,"")
WeightCount = NodeCount
For NetInCreator  = (NodeCount + 1) To ((NodeCount * 2)+1)
	CodeLine = [Node] + Transform(NetInCreator) + [NetIn = ]
	Fwrite(lnHandle,CodeLine)
	Local Codeline1
	For Iteration = 1 To NodeCount
		Dummy = Dummy + 1
		If Dummy < 5 And Iteration <= NodeCount
			Codeline1 = [(Node] + Transform(Iteration) + [Activation * W] + Transform(Iteration) + [_] + Transform(WeightCount) + [) + ]
			Fwrite(lnHandle,Codeline1)
		Else
			Codeline1 = [(Node] + Transform(Iteration) + [Activation * W] + Transform(Iteration) + [_] + Transform(WeightCount) + [) + ;]
			Fputs(lnHandle,Codeline1)
			Dummy = 0
		Endif
	Next Iteration
	CodeLine = CodeLine + " " + Codeline1
	Fputs(lnHandle,"")
	WeightCount = WeightCount + 1
	If WeightCount > (NodeCount * 2)
		Exit
	Endif
Next NetInCreator
I ain't skeert of nuttin eh?
Yikes! What was that?
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform