Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

chrom 63版本 xxnet 3.8.5稳定版 还是显示代理服务器?怎么解决?xxnet打不开 #9563

Open
Gdiann opened this issue Jan 20, 2018 · 5 comments

Comments

@Gdiann
Copy link

Gdiann commented Jan 20, 2018

常见问题:

@GoodSake
Copy link

信息太少,无处下手啊,哈哈哈!

@ghost
Copy link

ghost commented Jan 21, 2018

还是显示代理服务器?怎么解决?——貌似控制页正常
xxnet打不开 ——(与前面矛盾的)控制页都打不开?还是不能正常代理?——歧义😱
。。。

@ghost
Copy link

ghost commented Jan 21, 2018

#5322 (comment) 貌似非 Windows
😱非 Windows 的盲、盲、盲,逃。。。

@Gdiann
Copy link
Author

Gdiann commented Jan 21, 2018

打xxnet后在chrome浏览器显示的就是这串代码,我是电脑小白,不明白是什么原因。xxnet 3.8.3版本的时候还是很稳定的,我升级了3.8.5后,就无法打开了,具体原因不明?请问有知道怎么解决的吗?
Function CurrentPath()
strPath = Wscript.ScriptFullName
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile(strPath)
CurrentPath = objFSO.GetParentFolderName(objFile)
End Function

Function CurrentVersion()
strCurrentPath = CurrentPath()
strVersionFile = strCurrentPath & "/code/version.txt"

Set fso = CreateObject("Scripting.FileSystemObject")
If (fso.FileExists(strVersionFile)) Then

    Set objFileToRead = CreateObject("Scripting.FileSystemObject").OpenTextFile(strVersionFile,1)
    CurrentVersion = objFileToRead.ReadLine()

    version_path = strCurrentPath & "/code/" & CurrentVersion & "/launcher/start.py"
    If( Not fso.FileExists(version_path) ) Then
        CurrentVersion = "default"
    End If

    objFileToRead.Close
    Set objFileToRead = Nothing
Else
   CurrentVersion = "default"
End If

End Function

Function isConsole()
Set objArgs = Wscript.Arguments
'WScript.Echo objArgs.Count
'WScript.Echo objArgs(0)
isConsole = 0
If objArgs.Count > 0 Then
if objArgs(0) = "console" Then
isConsole = 1
End If
End If
End Function

strCurrentPath = CurrentPath()
strVersion = CurrentVersion()
Dim strArgs
quo = """"

If isConsole() Then
python_cmd = "python.exe"
Else
python_cmd = "pythonw.exe"
End If

strExecutable = quo & strCurrentPath & "\code" & strVersion & "\python27\1.0" & python_cmd & quo
strArgs = strExecutable & " " & quo & strCurrentPath & "\code" & strVersion & "\launcher\start.py" & quo
'WScript.Echo strArgs

Set oShell = CreateObject ("Wscript.Shell")
oShell.Run strArgs, isConsole(), false

@ghost
Copy link

ghost commented Jan 21, 2018

没逻辑,还是不识“。。。非 Windows”
代码盲😱
@GoodSake chrome 是除了 Windows 没其他系统用的浏览器?

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Development

No branches or pull requests

2 participants