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

для защиты Windows приложений

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

Visual Basic 6.0 - SQL синтаксис...


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

From: "Igor Evgrafov" <ievgrafo [@] jba.ru>


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" <broudkov [@] nir.ru>


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:
http://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" <tyomitch [@] r66.ru>


Hello, Sergey!
You wrote in conference fido7.ru.visual.basic to "Dmitry Viazowkin" <fido7.ru.visual.basic [@] talk.ru>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" <tyomitch [@] r66.ru>


Hello, Andrey!
You wrote in conference fido7.ru.visual.basic to "All" <fido7.ru.visual.basic [@] talk.ru>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: "Сергей Юрьевич Соколов" <Sokolov [@] exch.inec.kharkov.com>



"A. Skrobov" <tyomitch [@] r66.ru> сообщил/сообщила в новостях следующее:

news:000f01c39fc7$930fcb60$5598e2c2 [@] ASkrobov...
> Hello, Сергей!

> You wrote in conference fido7.ru.visual.basic to "All"

<fido7.ru.visual.basic [@] talk.ru> 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)