Gönderen Konu: Microsoft VBScript runtime error '800a0046' nedir bu hata [çözüldü]  (Okunma sayısı 10663 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı pscpthdr

  • İleti: 2
  • Puan: 0
Arkadaşlar kafayı yiyecem nedir bu hatanın çözümü

Microsoft VBScript runtime  error '800a0046'

Permission denied

/includes/classes/clsMenu.asp, line 1051

ayrıca ücretli hostumda db-www-log klasorleri var ben db klasörüne yazma izni veremiyorum
« Son Düzenleme: Şubat 29, 2008, 23:46:32 ÖS Gönderen: AdmiN »
Konuyu Paylaş:
  delicious  facebook  twitter  google

Çevrimdışı sevgi

  • İleti: 29
  • Puan: 0
-Microsoft VBScript runtime error '800a0046' nedir bu hata
« Yanıtla #1 : Şubat 28, 2008, 23:57:01 ÖS »
if instr(afile,"\") = 0 then afile = server.mappath(afile)

satırını bul ve hemen altına şu satırı ekle düzelmesi lazım

  else
  if instr(afile,"/") = 0 then afile = server.mappath(afile)

tam olarak aşağıdaki gibi görünmesi lazım

if instr(afile,"\") = 0 then afile = server.mappath(afile)
  else
if instr(afile,"/") = 0 then afile = server.mappath(afile)

« Son Düzenleme: Şubat 29, 2008, 00:01:33 ÖÖ Gönderen: sevgi »

Çevrimdışı pscpthdr

  • İleti: 2
  • Puan: 0
-Microsoft VBScript runtime error '800a0046' nedir bu hata
« Yanıtla #2 : Şubat 29, 2008, 22:35:03 ÖS »
allah razı olsun çok teşşekür ettim ::)

Çevrimdışı skyquakes

  • İleti: 143
  • Puan: 52
  • Cinsiyet: Bay
  • la uhibbul afilin...
    • Miskin Kedi
-Microsoft VBScript runtime error '800a0046' nedir bu hata [çözüldü]
« Yanıtla #3 : Mart 03, 2008, 23:10:52 ÖS »
kodlar yazılırken es geçilmiş bir slash farkı, anında çözüm. tebrikler  :"3
her şey bir tutam mavi uğrunaydı;
   biraz gökyüzünden,
            biraz denizden,
                biraz da kalbimizden...
bir tutam mavi içindi her şey...

Çevrimdışı sevgi

  • İleti: 29
  • Puan: 0
-Microsoft VBScript runtime error '800a0046' nedir bu hata [çözüldü]
« Yanıtla #4 : Mart 14, 2008, 04:48:17 ÖÖ »
RC7 Sürümünde CLSmenu.asp dosyasındaki hatalar için SKYdogg aşağıdaki çözümü önermiştir.

ÇÖZÜM:

if instr(afile,":") = 0 then afile = server.mappath(afile)

veya yukarıdaki değişikliği yaptıysanız yukarıda çözümünü verdiğimiz

if instr(afile,"\") = 0 then afile = server.mappath(afile)
  else
if instr(afile,"/") = 0 then afile = server.mappath(afile)

aşağıdaki kod ile değiştirin

if instr(afile,":") = 0 and left(afile,2) <> "\\" then
  afile = server.mappath(afile)
end if


Geniş bilgi için BURAYABURAYA  tıklayın
« Son Düzenleme: Mart 14, 2008, 04:52:25 ÖÖ Gönderen: sevgi »

Çevrimdışı menderes

  • İleti: 1
  • Puan: 0
-Microsoft VBScript runtime error '800a0046' nedir bu hata [çözüldü]
« Yanıtla #5 : Ağustos 10, 2008, 20:27:53 ÖS »
beyler nasıl yapılıyo biri bana tam detay anlatırsa sevinirim

Çevrimdışı burajan

  • Web Programcısı
  • Administrator
  • *
  • İleti: 5109
  • Puan: 334
  • Cinsiyet: Bay
  • Web Programcısı
    • Burak ŞİMŞEK - Kişisel İnternet Sitesi
-Microsoft VBScript runtime error '800a0046' nedir bu hata [çözüldü]
« Yanıtla #6 : Ağustos 10, 2008, 20:57:09 ÖS »
Yapımcının sitesinde biraz araştırma yaptım. İngilizcem pek yetereli gelmediği için tam olarak anlayamadım. Ancak anladığım kadarıyla bu yukarıdaki hatayı alanların, files klasörüne yazma izni vermeleri gerekiyormuş.

İngilizcesi olanlar buraya bakabilirler:
http://www.skyportal.net/forum_topic.asp?TOPIC_ID=5699&FORUM_ID=114&CAT_ID=4&Topic_Title=permission+denied+%2D+%2FclsMenu%2Easp&Forum_Title=SkyPortal+v1+%2D+Common+Errors
http://www.skyportal.net/forum_topic.asp?TOPIC_ID=3823&FORUM_ID=94&CAT_ID=4&Topic_Title=Premission+Denied&Forum_Title=SkyPortal+RC5+%2D+SUPPORT
Kişisel İnternet Sitem => buraksimsek.com.tr - http://www.buraksimsek.com.tr

Lütfen özel mesaj ile destek istemeyiniz. Önce forumda arama yapınız daha sonra forumda ilgili bölüme konu açınız.

Çevrimdışı Rain_Man

  • İleti: 1
  • Puan: 0
Yeni Anket Yarat
Microsoft VBScript runtime error '800a0046'

Permission denied

/poll/newpoll.asp, line 66


hata veren satıra


 Set FS=Server.CreateObject("Scripting.FileSystemObject")
      Set RS=FS.OpenTextFile(Server.MapPath("variables.asp"), 2, False)

      
      RS.WriteLine("<" & "%")
      RS.WriteLine("Dim question, responses(8), votes(8)")
      RS.WriteLine("question = """ & question & """")
      For i = 1 to 8
      RS.WriteLine("responses(" & i & ") = """ & responses(i) & """")
      RS.WriteLine("votes(" & i & ") = " & votes(i))
      Next
      RS.WriteLine("%" & ">")

      RS.Close
      Set RS=Nothing
      Set FS=Nothing

      %>

      <div class="normal">Yeni Anket Yaratildi! Girdiginiz degerler asagidadir;</div>

      <div class="normal"><% Response.Write(question) %></div>
      <%
      For i = 1 to 8
      If responses(i) <> "" Then
      %>
      <div class="normal"><% Response.Write(responses(i)) %></div>


gittim ama yukardaki çözümleri kendim uygulamaya çalıştım ama pek bilmediğimden yapamadım bu kondua yardımcı olursanız çok teşekkür ederim şimdiden...

 

Benzer Konular

  Konu / Başlatan Yanıt Son İleti
6 Yanıt
2710 Gösterim
Son İleti Eylül 24, 2008, 23:16:30 ÖS
Gönderen: AdmiN
3 Yanıt
2872 Gösterim
Son İleti Ağustos 12, 2008, 23:49:42 ÖS
Gönderen: sevgi
19 Yanıt
4868 Gösterim
Son İleti Mart 19, 2009, 18:19:22 ÖS
Gönderen: bydarkmoon
0 Yanıt
1522 Gösterim
Son İleti Mart 11, 2010, 20:37:44 ÖS
Gönderen: ehcsrob
6 Yanıt
1648 Gösterim
Son İleti Eylül 11, 2010, 10:56:52 ÖÖ
Gönderen: yolal