[Resolvido] Erro Global.asa

Olá comprei um sisteminha asp com mysql que da erro nbo global pois quando eu o apago do servidor a pagina aber quando eu coloco que devolta ja erra, ja tentei alterar o diretorio no arwquivo global e tudo to postando aqui o original para ver se podem me ajudar. valeu

segue o codigo

<script LANGUAGE="VBScript.Encode" RUNAT="Server">
'========================
Sub Application_onstart
'========================
'### Check these Fileman global settings!
Application("strConn")="DBQ=" & server.mappath("database/fileman.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;"
'Application("UseNTAuthentication")=True '### Use integrated NT authentication if available. Anonymous access from fileman needs to be revoked in IIS. Also create FM accounts for the NT Users! ###
Application("DefaultRootFolder")="c:\temp\%user%" '### Default root folder for new accounts. Variable %user% will be replaced with the new user name, the new folder will be created.###
Application("RequireRootFolder")=False '### Verify on logon that the user has a rootfolder defined, exit if not (not for admins). ###
Application("OnlyAllowedIPList")="" '### Comma delimited list of allowed IP numbers/ranges. Example: "192.,10.0.0." ###
Application("MaxHistoryItems")=20 '### Remember last folders in user selectable listbox ###
Application("MaxLengthOfHistoryItems")=30 '### Names of items in history listbox will be shortened if longer than this value ###
Application("UnEditableExtensions")="com,exe,dll,ocx,386,sys,drv,bin,jpg,gif,bmp,zip,arj,rar,mdb,xls,mp3,mpg,avi,mov"
Application("CustomButtons")="" '### If defined, this custom html string will be added to the toolbar. This gives admins the option to add functionality to FileMan (buttons are 20x20 pixels). ###
Application("ExtraErrorMsg")= "" '### Optional customizable additional error message string that is displayed in case of an error, for example how to contact the helpdesk. ###
Application("FMRecyclerName")="FMRecycler_" '### If defined, this subfolder of RootFolder will be used to move deleted files to if configured for the user (username will be added to this name, not for users with no RootFolder). Example: "FMRecycler". ###
Application("NumUploadFields")=6
Application("MinPassLength")=4
Application("ShowDrives")=True '### Show drive icons if no rootfolder is defined. ###
Application("DownloadInNewWindow")=False
Application("AlwaysDownload")=False '### Treat all downloads as attachments (always show the "Save as" dialog). If False, the browser will display txt, html, images in the browser window etc.###
Application("ZipSupport")=True '### Use ZIP functions (if the component is installed). ###
Application("LogFile")="fileman.log"
Application("LogLevel")=1 ' 0: Off, 1: Show user actions like Login/Logout/Edit/Del/Upload/Download, 2: Also show: Find/Listing/Denied, 3: Show full matching process

'Start Encode#@~^VwsAAA==@#@&B:[a,Ztm0~l N~0KDhCDPla2VbmlDrGx,\mDdP::[@#@&ba2VbmCObWxcEwH#+MdbWUr#{J&c1E@#@&b2w^k^CDkW cJ~oZKsGD_+mNnDEb{JT!ZT%ZJ@#@&zwwsr1lOkKUvJ$TZKVWMsKsNDdJ'E9GffA3J@#@&ba2sk1lDkGxcE~o/W^GDwksnkJ#xEA232w0r@#@&zwaVk1lDrW Estb22&/q rYblVb"nNr#{K.En@#@&b2w^rmmYrG J6U^X)V^GS+[&ndk/DJxIwsl1+c)awVb^lDkW cEr VHbsVGAN(ndr/DJbSreJSEr#@#@&&W,b2aVbmlDkKUrSGowksnr#@!@EJ,b1G~(xkYM)w2sbmCYbGxvJJGTsksnr#SJ=wr#xZPz1f,q dYM)waVr^mYkKUrSWTorVJ~E-wE'TP:4+ P)2aVk^CDkGxvEdWLwk^+J'UnD7+.Rtl22mYtv)waVk1COkKxvJJWLobVnJb@#@&@#@&v[aa~!Y~+XrkYr o,0k^+,OXa+~k1WUdcPa[:@#@&?+D~W/K'U+.\n.cZ.+mO+}4%n1YEj1DrwDr o wk^+?H/Dn:}4%+1YEb@#@&?OPK0W^[nD{0kW onO6WsN.U+.-DR\CawCY4crqhTJ#@#@&?OPKsrV/xGwWV9nDc0k^nd@#@&bawsk^CDkGxvEKHwn(1WxdE'#4:C(@#@&wWMP+mm4~0,kUPKsrs/@#@&7q6Pj;Cd+v0kW MnOA6O+ dkKxHCs+Wb'EM&orP)gf,qxkYMcFB0 xm:nSrY{rSF'F,P4+ Pzw2Vr^mYrW cJ:X2n&mWUdr#xba2^k^mYbWxvJ:zwq^W /Eb,_PtrNv0/K L+D4m/nxChW#Bf#,[~#(Kl8@#@&1n6D@#@&?nDPKsk^+kx1KY4k o@#@&U+Y,G0KVN.x1KY4kUo@#@&U+OP6dW{1GO4kxL@#@&@#@&q6~zw2^k1lYbW cJ\k2?!w2GMYJ~K4+x,@#@&d}x,2.DG.,In/!h+,1naD@#@&7vU+OPKtbw~{PU+D7+M ZM+CYr8%mYvEZ4kV0CO}bwcZ4ksVmYtkaE#@#@&7vK}k2 xsW1V;WhaW +xD&,cJShARM+[rMRlkm\.}M8{.?yFnIE#@#@&i?nY,G4N'jnM\+. ;DnlDn}4%mDJm/atkaR3lkXt(hJ#@#@&d&0PA..P{PZPPtnU,b2w^rmmYrG Jtra?;waGMYE':DEPAs/P)waVr^mYkKUr}kaj;waWMYE#xomVd+@#@&dU+O~}4LxHKY4k L@#@&3 N,q0@#@&@#@&2 N~?!4@#@&@#@&?!8Pzww^r^lDkKxmrU3 N@#@&AUN,?;8@#@&@#@&v{'x'{x{'x{'{''{'{x'{'x'{@#@&j!4PUn/kkW m6xUYmDO@#@&v{'x'{x'{'xx{''xx{'x'{x{'@#@&dE?+k/bGxcS/qG'qT2&PE:a[P?O~YKP?~VG^mV~/OYbxLd@#@&djnk/rW crqKr#{I+$EdYc?nD7+.#mDkm8V/r]3H}KA{)f9]r#@#@&i(0,b22^kmCObWUrik+H:b!YtxDrmmYrW Jb~:t+ @#@&id?ddkKxvJHKidDE#{]+$EndDR?n.7+..m.bl8^+kJzj:u{?3Ir#@#@&idq6~q /YMcj+k/bWUEH:jd+ME#BJwE@!~P4+UPUnk/rKxvJ1:jknDr#xHbNcj//bGxvJ1:id+MJ~(xdOMDn\vj+k/rG JHP/nDrbBJwr#3F#@#@&i3x9P(0@#@&3U9P?!8@#@&@#@&Exx'{'{'x'xx{'x'{x'{'xx{'@#@&j!4~?dkkG {}x2 N@#@&B{'x'{'xx{''{x'{''{xx'{'{@#@&rU~D.WM~D/;hPxnaD@#@&q6~&/6(LmYv?d/bWUrIjE#P:4+ P?O~?/kkGxcE"?E#{HWDtrUT@#@&(W,?n/krKxcrjk+Dr#@!@JrPPtx@#@&i?+D~ZKxx{jnD7+MR/DnCD+64NnmDE)Grf$ ;WUx^DkG J@#@&imKUxcW2+ P)2aVk1CYbWxvEdYMZKxUJb@#@&djpdxPrjK9zK2~JKorx,jAK~gEsSWTk d'rP'PU+ddbWxvE1!:SKLrxkJP'PES,SC/D(n{BE~LP?ndkkGxvE&nEPLPJE~dC/DKr:'vE,[PUn/kkW cESKobxPkhnr#~[,EBBPJCkYfr.{BEPL~U+dkkKxrfb.JP'PrBS~_k/DGDH'Br~'P"+aVCmncU+d/bGxvJurkYW.zr#SJEEBJvEBEJ#,[,EB,u2"2~ik+D,xBrP[,jn/kkKxcJidDE#L~JEP)HGPnCdk'vJ,',?nk/bWxvJhC/kJbPLPEvpJ@#@&7ZKxxcna+1ED+c?}J@#@&d;Gx R/sK/+@#@&i?nY,/KxU{1KYtbxT@#@&iqWPzw2sbmlDrW JdGLsbVJb@!@ErPPtU@#@&d7jYPWdK'j+M-D ;DlYr(%+1YcJUm.raYk LRwkVjz/D+sr8Ln^DJb@#@&7dU+O~6SWLx6/GR}2xP6Dsk^+v)waVrmmYrG JdGowkVEb~R~:D;+b@#@&d70dGoc.rD+SrUPHWS~LP#(Ym4PLPUn/kkGxvJidDJ~[,.4DC8PLPU+d/rG EqhE#,[~#(Kl8~LPESKLKEO,U+/kkKUPDkh+KEObr@#@&i70dWoc^sWk+@#@&7djnDPW/Kx1KY4r o@#@&7Ax[P&W@#@&7zwaVk1lDrW E1!:/G xJ*xbawVb^CYbW `E1;h;WUxrbO8@#@&3 NP(W@#@&3x9~UE8@#@&DFkDAA==^#~@</SCRIPT>