|
|
|
Как узнать количество записей в txt box sub репорта
|
|||
|---|---|---|---|
|
#18+
имеется в отчете объект image (путь подставляется по гиперссылке хранящейся в поле photo) все повешено на процедуру activate report. Если запись одна, то все работает, если больше то, везде выводится одна и та же фотка. Как узнать количество записей в txt box sub репорта, чтобы для каждой записи в image указывать свой путь к картинке? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.12.2003, 14:48 |
|
||
|
Как узнать количество записей в txt box sub репорта
|
|||
|---|---|---|---|
|
#18+
а слабо привязать image к таблице отчета? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.12.2003, 14:51 |
|
||
|
Как узнать количество записей в txt box sub репорта
|
|||
|---|---|---|---|
|
#18+
1. В текстбоксе не может быть количество записей. 2. Чтобы указывать адрес картинки, не нужно знать количество записей. Все пишется в OnFormat секции - об остальном Аксесс заботится сам. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.12.2003, 14:52 |
|
||
|
Как узнать количество записей в txt box sub репорта
|
|||
|---|---|---|---|
|
#18+
image к таблице отчета? а как это сделать? повесил процедурину на OnFormat ничего не изменилось.... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.12.2003, 15:29 |
|
||
|
Как узнать количество записей в txt box sub репорта
|
|||
|---|---|---|---|
|
#18+
Можно посмотреть на текст программы? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.12.2003, 15:44 |
|
||
|
Как узнать количество записей в txt box sub репорта
|
|||
|---|---|---|---|
|
#18+
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) Dim strLink As String Dim strPath As String Dim strPathOK As String Dim strPos As Integer Dim strRez As Integer Dim IntCount As Integer 'Dim rs As New ADODB.Recordset 'rs.Open "Employees", CurrentProject.Connection, adOpenKeyset, adLockOptimistic strLink = Reports!rptMain!rptPhoto.Report.txtPhoto.Value If strLink <> "" Or Empty Then strPos = InStr(strLink, "#") strRez = Len(strLink) strPath = Left(strLink, strRez - 1) strPath = Right(strLink, strRez - strPos) strRez = Len(strPath) strPathOK = Left(strPath, strRez - 1) 'Me.Image.SetFocus Reports!rptMain!rptPhoto.Report.Image.Picture = "C:\ctri\" & strPathOK 'Stop Else Reports!rptMain!.Report!Image.Picture = "" End If End Sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.12.2003, 16:12 |
|
||
|
Как узнать количество записей в txt box sub репорта
|
|||
|---|---|---|---|
|
#18+
1. Это OnFormat подчиненного отчета или главного? Должно быть подчиненного. 2. Конструкция Reports!rptMain!rptPhoto.Report лишняя, ее надо заменить (в зависимости от ответа на предыдущий вопрос) на Me!rptPhoto.Report или Me. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.12.2003, 16:52 |
|
||
|
Как узнать количество записей в txt box sub репорта
|
|||
|---|---|---|---|
|
#18+
авторIf strLink <> "" Or Empty Then Кстати, это неверно. Потому что: 1. Переменная типа String никогда не будет Empty. 2. Проверка на Empty делается не через = или <>, а вот как: IsEmpty(MyPerem). 3. По логике должно быть не Or, а And. 4. Операции Or и And выполняются после <>, поэтому слово Empty не будет участвовать в сравнении с strLink. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.12.2003, 16:57 |
|
||
|
Как узнать количество записей в txt box sub репорта
|
|||
|---|---|---|---|
|
#18+
был на главном, повесил на подчиненый, без эффекта. там где несколько записей txtPhoto там отображаются одинаковые картинки ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.12.2003, 17:20 |
|
||
|
Как узнать количество записей в txt box sub репорта
|
|||
|---|---|---|---|
|
#18+
Предлагаю все-таки учесть то, что я написал. Если не будет работать, тогда будем разбираться дальше. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.12.2003, 17:22 |
|
||
|
Как узнать количество записей в txt box sub репорта
|
|||
|---|---|---|---|
|
#18+
Все что вы предложили, абсолютно правильно, но раз отображается первая картинка, то сама процедура работает, я так понимаю, если записей несколько, то она должна запускаться повторно при выводе, каждой записи, а вот этого то и не происходит... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.12.2003, 17:42 |
|
||
|
|

start [/forum/topic.php?fid=45&msg=32364809&tid=1677420]: |
0ms |
get settings: |
9ms |
get forum list: |
11ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
21ms |
get topic data: |
7ms |
get forum data: |
2ms |
get page messages: |
32ms |
get tp. blocked users: |
1ms |
| others: | 231ms |
| total: | 318ms |

| 0 / 0 |
