Обходной путь в Vista

Question

У меня на компьютере под управлением Windows XP работает .exe .

Этому .exe требуется файл в том же каталоге для запуска, и нет проблем с его поиском в Windows XP. Но в Windows Vista (я пробовал это на нескольких машинах и работает на некоторых из них) не удается запустить.

Я предполагаю, что есть проблема с поиском пути. Программа написана в основном (да, я знаю ..)

Я приложил код ниже. Можете ли вы придумать какие-либо обходные пути?

.exe находится в C:\tools Также программа запускается в консоли Windows (запускается, но затем во время выполнения не может найти пользовательский тип файла.ТОП сделан создателем программы)

     '   PROGRAMM  TOP11.BAS



DEFDBL A-Z
CLS
LOCATE 1, 1
COLOR 14, 1
FOR I = 1 TO 80
   PRINT "±";
NEXT I
LOCATE 1, 35: PRINT "ΝΝ TOP11 ΝΝ"
PRINT "    €€‚—‚„‘ ’— ‹„’†‘„— ‘’† „”€„€ ’†‘ ‡€€‘‘†‘ ‰€ † „.‚.‘.€.     "
COLOR 7, 0
PRINT "-------------------------------------------------------------------------------"
PRINT
INPUT "ƒι©« «¦¤ ©¬¤«Ά©«γ ¤ΰγ... :  ", Factor#
INPUT "¤¦£ ¨®ε¦¬ [.TOP] : ", topfile$
VIEW PRINT 7 TO 25
file1$ = topfile$ + ".TOP"
file2$ = topfile$ + ".T_P"
file3$ = "Syntel"
OPEN file3$ FOR OUTPUT AS #3
PRINT #3, " ‘¬¤«Ά©«γ ¤ΰγ = " + STR$(Factor#) + "   †‹„‹†€: " + DATE$
CLOSE #3

command1$ = "copy" + " " + file1$ + " " + file2$
SHELL command1$   '’¦ ¨®ε¦ .TOP ¤« ¨α­«  £ «¤ ΅«αΆ¥ .T_P



OPEN file2$ FOR INPUT AS #1
OPEN file1$ FOR OUTPUT AS #2
bb$ = " \\\    \ ,   ###.####   ###.####   ####.###    ##.### "
DO
         LINE INPUT #1, Line$
         Line$ = RTRIM$(LTRIM$(Line$))
         icode$ = LEFT$(Line$, 1)
        IF icode$ = "1" THEN
           Line$ = " " + Line$
           PRINT #2, Line$
           PRINT Line$
        ELSEIF icode$ = "2" THEN
           Line$ = " " + Line$
           PRINT #2, Line$
           PRINT Line$
        ELSEIF icode$ = "3" THEN
             Number$ = MID$(Line$, 3, 6)
             Hangle = VAL(MID$(Line$, 14, 9))
             Zangle = VAL(MID$(Line$, 25, 9))
             Distance = VAL(MID$(Line$, 36, 9))
             Distance = Distance * Factor#
             Height = VAL(MID$(Line$, 48, 6))
           PRINT #2, USING bb$; icode$; Number$; Hangle; Zangle; Distance; Height
           PRINT USING bb$; icode$; Number$; Hangle; Zangle; Distance; Height
         ELSE
        END IF

LOOP UNTIL EOF(1)
VIEW PRINT
CLS
LOCATE 1, 1
PRINT "               ***  ’„‘ ’“ ‚€‹‹€’‘ ***                "
END

Answer 1

Вот Это Да!

Что ж, мое первое предположение - проблема UAC (использование контроля учетных записей) , попробуйте щелкнуть правой кнопкой мыши файл и выбрать « Run as administrator и посмотреть, работает ли он.