не создаются папки с русскими именами

[HBasic]

Не создаются папки с русскими именами.Функции создания папок не понимают адреса содержащие русские буквы разделенные слэшами.

[iGrok]

Не создаются папки с русскими именами.Функции создания папок не понимают адреса содержащие русские буквы разделенные слэшами.

Очень информативно. И чё?

[Debugger]

Не создаются папки с русскими именами.Функции создания папок не понимают адреса содержащие русские буквы разделенные слэшами.

папки

адреса

Так папки или адреса?

русскими именами

русские буквы разделенные слэшами

А это еще к чему?

На германской винде русские папки тоже не создаются. Сам проверял. Может, винда паленая?

[HBasic]

Не создаются папки с русскими именами.Функции создания папок не понимают адреса содержащие русские буквы разделенные слэшами.

Очень информативно. И чё?

Как бы создать.

[HBasic]

Не создаются папки с русскими именами.Функции создания папок не понимают адреса содержащие русские буквы разделенные слэшами.

папки

адреса

Так папки или адреса?

И папки и адреса.

русскими именами

русские буквы разделенные слэшами

А это еще к чему?

Строку с адресом с русскими буквами бейсик не понимает.

На германской винде русские папки тоже не создаются. Сам проверял. Может, винда паленая?

Нет, не паленая.CurDir() адрес с русскими папками возвращает.А MkDir() адреса с русскими буквами не понимает.

[arvitaly]

MkDir "d:\аааааббббвввв" у меня создало эту папку

Покажи код

[DeMONiZ]

Аналогично, у меня тоже создало!

Код: Выделить всё

Private Sub Command1_Click()
MkDir "D:\тест"
End Sub



[iGrok]

Чё-то у нас флудеров развелось...

[HBasic]

MkDir "d:\аааааббббвввв" у меня создало эту папку

Покажи код

С одним русским именем после слэша-то создаст.А вы попробуйте создать например "C:\фы\мавым" -будете удивлены.

[arthur2]

Дело не в русских буквах. Вложенные папки нужно создавать по-очереди

[Maxxx.!!!.]

Вложенные папки нужно создавать по-очереди - блин, папу лет назад, помню, использовал какую-то вроде бы API-функцию, к-я позволяла избежать этой ошибки, т.е. если написать что-то вроде mkdir "c:\one\two", даже если папок one или two не существует, ф-я тогда сама их создает. Только вот найти ее не могу , может, кто еще вспомнит.

[arthur2]

т.е. если написать что-то вроде mkdir "c:\one\two", даже если папок one или two не существует, ф-я тогда сама их создает. Только вот найти ее не могу , может, кто еще вспомнит.

Зачем искать? Напиши сам обертку над mkdir. Делов-то

[iGrok]

Зачем искать? Напиши сам обертку над mkdir. Делов-то

Зачем писать? CreateDirectory.

[Maxxx.!!!.]

CreateDirectory.

Точно, ее-то я и имел ввиду!

[HBasic]

Извините мужики - перепутал.Да, надо их последовательно создавать.
Но я сначало FSOшной CreateDirectory пользовался - нифига вложенные папки не создаются.

[dr.MIG]

Но я сначало FSOшной CreateDirectory пользовался - нифига вложенные папки не создаются.

А надо было API-шной .

[HBasic]

Но я сначало FSOшной CreateDirectory пользовался - нифига вложенные папки не создаются.

А надо было API-шной .

Вот где собака порылась.
А вы не могли бы дать ее описание,где ее объявлять и куда это объявление втыкать.

[Хакер]

А вы не могли бы дать ее описание,

Ты сам мог бы взять его в MSDN.

где ее объявлять

В начале модуля.

и куда это объявление втыкать.

Никуда.

[HBasic]

У меня MSDNа нет.
Ладно, спасибо.Я уже вручную через MkDir сделал.

[Maxxx.!!!.]

Ну и зря, лучше юзай API. Вот тебе описание сей функции (из справочника по API А. Климова):

Функция CreateDirectory

Код: Выделить всё

Declare Function CreateDirectory Lib "kernel32" Alias "CreateDirectoryA" (ByVal lpPathName As String, lpSecurityAttributes As SECURITY_ATTRIBUTES) As Long

--------------------------------------------------------------------------------
CreateDirectory создает новую папку на диске. Также вы можете установить аттрибуты безопасности для вновь созданной папки, если это позволяет операционная система
--------------------------------------------------------------------------------
Платформа
Windows 95/98/ME: Поддерживается
Windows NT: Требуется Windows NT 3.1 или выше
Windows 2000/XP: Поддерживается

Возвращаемое значение
В случае ошибки функция возвращает 0 (используйте GetLastError для получения кода ошибки). В успешном случае возвращается ненулевое значение

Параметры
lpPathName
Имя для новой папки
lpSecurityAttributes
Windows NT, 2000: Аттрибуты безопасности для новой папки. Windows 95/98: Этот параметр игнорируется

Пример

Код: Выделить всё

' Создаем новую папку C:\RussianProject и
' устанавливаем аттрибуты по умолчанию
Dim Security As SECURITY_ATTRIBUTES  ' структура аттрибутов безопасности
Dim retval As Long ' возвращаемое значение

' Создаем папку
retval = CreateDirectory("C:\RussianProject", Security)
' Если функция вернула 0, значит ошибка
If retval = 0 Then
  MsgBox "Ошибка : Не могу создать папку !"
End If

[iGrok]

У меня MSDNа нет.

Не верю.
Если у тебя есть доступ на форум, то у тебя есть доступ к msdn.microsoft.com.