Техническая поддержка :

Современные решения

для защиты Windows программ

и восстановления исходного кода

Обсуждение программирования на Visual Basic в конференции ru.visual.basic


Re: SQL синтаксис...

From: "Igor Evgrafov"

Hello, Sergey!
You wrote to Валерий Калинин on Thu, 30 Oct 2003 07:06:27 +0000 (UTC):

ВК>> SQLd = "SELECT Id FROM Doljnost WHERE Nazvanie = "
ВК>> +chr(39)+Combo1.Text+chr(39)
ВК>> Set rsSQLd = data.OpenRecordset(SQLd)
ВК>> что тут не так???
ВК>> какого типа должен быть SQLd? TString?
ВК>> или какой сиснтаксис у параметрических запросов???

SN> Я всегда пишу так:


SN> SQLd = "SELECT Id FROM Doljnost WHERE Nazvanie = ' " & Combo1.Text & "
SN> ' "

SN> Пробелы между одинарными и двойными кавычками я поставил для
SN> наглядности, при таком написании, у меня никогда не возникало проблем,
SN> ни с Access, ни с MSSQL, ни с Oracle.

Hе удивительно - так писать полагается по стандарту SQL.

ЭЫЖ Hа DB2 AS/400 (как и на прочих DB2) аналогично.

- ---
With best regards, Igor Evgrafov.


* Origin: Cronyx Plus ISP (2:5020/400)


Re: Database

Мы где-то виделись, Michael?

31 Oct 03 09:30:17 в RU.VISUAL.BASIC Michael Alekseyev, Jr. -> мне:

DK>> Вообще, новичку в пpогpаммиpовании я бы посоветовал начать с какой-нибудь
DK>> книжки. Желательно, чтобы это был не спpавочник по VB, коих сейчас
DK>> pазвелось немеpяно, а ноpмальная книга, в котоpой также объясняются
DK>> пpинципы написания кода, алгоpитмы и т.д. Как пpавило, в таких книгах
DK>> тема баз данных тоже затpагивается.
MAJ> Есть одна, но там пpо откpытие-закpытие ни слова

Hо про базы данных хоть что-то есть?

MAJ>>> А этот CommonDialog.ShowOpen возвpащает какое-нибудь значение?
MAJ>>> Hужно, допустим, пеpеменной filename пpосвоить стpоковое значение
MAJ>>> пути к файлу.
DK>> With CommonDialog1
MAJ> Как и где его объявить? (пpосто см. конец письма)

Ctrl+T
[v] Microsoft Common Dialog Control
OK

Открыть панель инструментов
открыть форму
положить Common Dialog на форму

MAJ> После вешанья этого на кнопку VB оpет:
MAJ> Runtime error '424':
MAJ> Object required

См. выше. Кстати, зайди в настройки и поставь галочку "Require variable
declaration".

Всего хорошего!
Дмитрий Козырев aka Master

P.S. И еще: напоминаю, что для чайников существует эха
RU.VISUAL.BASIC.CHAINIK.

* Origin: Дорогу осилит идущий. (2:5023/11.148)


Re: Профайлер

From: "Sergey Broudkov"

Hello, Dmitry!
You wrote to A. Skrobov on Fri, 31 Oct 2003 21:48:00 +0000 (UTC):

>> Тут недавно упоминали о существовании сабжа для эхотага, напомните, где
>> его взять.

DV> А... эээ.... да не работает он по-человечески, "как не крути" (C)Rich.
DV> Hа сколь-нибудь сложном проекте виснет на этапе подготовки,
DV> ЮзерКонтролы терпеть ненавидит, и пара глюков поменьше. Воткнуть руками
DV> GetTickCount в десяток нужных мест почему-то получается надежнее.

А ты про какой сабж говоришь? Признанным является профайлер из состава
NuMega DevPartner:
www.compuware.com/products/devpartner/default.htm

--
Regards,
Sergey Broudkov
sbpro [@] geocities.com
ICQ #4841919
А может, в реестре чего подправить? d;--D

* Origin: Demos online service (2:5020/400)


Re: Профайлер

From: "A. Skrobov"

Hello, Sergey!
You wrote in conference fido7.ru.visual.basic to "Dmitry Viazowkin" to Dmitry Viazowkin on Sat, 1 Nov
2003 02:31:17 +0000 (UTC):

AS>>> Тут недавно упоминали о существовании сабжа для эхотага, напомните, где
AS>>> его взять.
DV>> А... эээ.... да не работает он по-человечески, "как не крути" (C)Rich.
DV>> Hа сколь-нибудь сложном проекте виснет на этапе подготовки,
DV>> ЮзерКонтролы терпеть ненавидит, и пара глюков поменьше. Воткнуть руками
DV>> GetTickCount в десяток нужных мест почему-то получается надежнее.
SB> А ты про какой сабж говоришь? Признанным является профайлер из состава
SB> NuMega DevPartner:
SB> http://www.compuware.com/products/devpartner/default.htm
Так он, наверное, платный? Где ломаный-то взять?


With best regards, A. Skrobov. E-mail: tyomitch [@] r66.ru



--
* Origin: Talk.Mail.Ru (2:5020/400)


как создать копию объекта ?

Hi All !

САБЖ

set a = b ' в этом случае обе переменных будут указывать на один объект.
А мне нужно создать новый объект, равный данному. Как это можно сделать ?


Bye :-)

* Origin: WinPoint 95 is a girls best friend! (2:5059/28.35)


Re: Database

Здpавствуйте, Dmitriy!
Ко мне на стол из RU.VISUAL.BASIC упало Ваше письмо к Michael Alekseyev, Jr. пpо "Re: Database" и я pешил написать:

DK> В 13м уpоке там описаны основы pаботы с базами данных чеpез элемент
DK> упpавления Data. Так вот, у него есть свойство DatabaseName, котоpое
DK> позволяет пpивязать его к опpеделенному файлу.

Вот такая вот фигня как pаз и не pаботает:

Private Sub buttonOpen_Click()
Dim MyDataBase As Database
Dim MyDataName As String

With CommonDialog1
.CancelError = True
On Error GoTo DontOpen
.Flags = cdlOFNFileMustExist
.InitDir = App.Path
.Filter = "Файлы баз данных|*.mdb"
.ShowOpen
Set MyDataBase = OpenDatabase(.FileName)
End With

MyDataName = MyDataBase.Name 'Получили путь к БД
MyDataBase.DatabaseName = MyDataName 'а путь то к Data и не пpисвоить :(

DontOpen:
End Sub


WBR, Misha 01 ноябpя 03 19:31
*:* (WinAmp is not running)
* Origin: Пиво Золотая Почка! (2:5030/1984.42)


Re: как создать копию объекта ?

From: "A. Skrobov"

Hello, Andrey!
You wrote in conference fido7.ru.visual.basic to "All" to All on Sat, 01 Nov 2003 16:26:40 +0300:

AS> set a = b ' в этом случае обе переменных будут указывать на один объект.
AS> А мне нужно создать новый объект, равный данному. Как это можно сделать ?
Если объект сам не предоставляет такой возможности, тогда никак. Это фундаментальная основа ООП: ты не можешь сделать с объектом
ничего, кроме обращения к его методам/свойствам.


With best regards, A. Skrobov. E-mail: tyomitch [@] r66.ru



--
* Origin: Talk.Mail.Ru (2:5020/400)


Re: Database

Мы где-то виделись, Michael?

01 Nov 03 19:35:14 в RU.VISUAL.BASIC Michael Alekseyev, Jr. -> мне:

DK>> В 13м уpоке там описаны основы pаботы с базами данных чеpез элемент
DK>> упpавления Data. Так вот, у него есть свойство DatabaseName, котоpое
DK>> позволяет пpивязать его к опpеделенному файлу.

MAJ> Вот такая вот фигня как pаз и не pаботает:

MAJ> Private Sub buttonOpen_Click()
MAJ> Dim MyDataBase As Database
MAJ> Dim MyDataName As String

MAJ> With CommonDialog1
MAJ> .CancelError = True
MAJ> On Error GoTo DontOpen
MAJ> .Flags = cdlOFNFileMustExist
MAJ> .InitDir = App.Path
MAJ> .Filter = "Файлы баз данных|*.mdb"
MAJ> .ShowOpen
MAJ> Set MyDataBase = OpenDatabase(.FileName)
MAJ> End With

MAJ> MyDataName = MyDataBase.Name 'Получили путь к БД
MAJ> MyDataBase.DatabaseName = MyDataName 'а путь то к Data и не пpисвоить :(

Похоже, у тебя нехилые попутки. Я тебе про что говорил? Про свойство
Data.DatabaseName, а ты приплел сюда объект Database.

.ShowOpen
Data1.DatabaseName = .FileName

Еще надо не забыть установить DataSource - имя таблицы в базе данных.

Всего хорошего!
Дмитрий Козырев aka Master

* Origin: Дорогу осилит идущий. (2:5023/11.148)


Re: как создать копию объекта ?

Мы где-то виделись, Andrey?

01 Nov 03 16:26:40 в RU.VISUAL.BASIC Andrey Shmelev -> All:

AS> set a = b ' в этом случае обе переменных будут указывать на один объект.
AS> А мне нужно создать новый объект, равный данному. Как это можно сделать ?

Предусмотреть в этом объекте метод Clone, который будет все внутренние данные
копировать ручками.

Любой _принципиально_ другой метод является некорректным с точки зрения ООП.

Всего хорошего!
Дмитрий Козырев aka Master

* Origin: Дорогу осилит идущий. (2:5023/11.148)


Re: RTF

From: "Сергей Юрьевич Соколов"


"A. Skrobov" сообщил/сообщила в новостях следующее:
news:000f01c39fc7$930fcb60$5598e2c2 [@] ASkrobov...
> Hello, Сергей!
> You wrote in conference fido7.ru.visual.basic to "All"
on Fri, 31 Oct 2003 15:35:22 +0000 (UTC):
>
> СЮС> Приветствую всех.
> СЮС> А не знает ли кто, есть ли на свете библиотека для создания
RTF-файлов?
> СЮС> Интересует полноценное создание RTF-ов, т.е. с табличками,
> СЮС> колонтитулами и пр.
> А что _именно_ должна делать библиотека?
> Может быть, MS Word тебя устроит?
Библиотека должна уметь создавать RTF-файлы. MS Word не совсем, или совсем
не устраивает, т.к. на машине его может и не быть,
а интересует лицензионная чистота. Описани тегов RTF в MSDN есть, писать
самому возможно, но долго, а время поджимает.
Так что, никто ничего подсказать не может?

Sergey Sokolov



--
* Origin: Talk.Mail.Ru (2:5020/400)



Назад Содержание Вперед




Главная     Программы     Статьи     Разное     Форум     Контакты