Есть таблица:
<table>
<tr>
<td class=text bgcolor="#CCCCCC" style="cursor:hand" onMouseOver="this.style.background='#96A096'"
onMouseOut="this.style.background='#CCCCCC'">
</td>
</tr>
</table>
В IE при наведении на эту таблицу указатель мыши меняется с стрелочки
на кистью и пальцем(как при наведении на ссылку)
а в OPERE ничего не меняется.
Что нужно сделать с этим тегом что бы в IE эффект был таойже
как и в Opera`е ?
т.е. как убрать внешнее ощущение ссылки при наведении на такую
таблицу.
Как зная IP адрес компа отослать на него сообщение и показать
его там например с помощью процедуры ShowMessage. На обеих компах
стоит Windows NT 4
Ответ:
Для того чтобы на другом компьютере появилось сообщение - необходимо,
чтобы там был установлен клиент. Только что в листе Delphi@soobcha.org
пролетел пример как сделать чат для локалки на базе компонента
из библиотеки Indy, отлично объясняющий принцип таких приложений.
Вам нужно только заменить добавление строки в TMemo на Ваше ShowMessage,
а широковещательное сообщение на сообщение для конкретного IP.
--------------------------начало цитирования---------------------------
Если я не один такой идиот, то держите помощь от хрю:
Чат для локалки собственными руками
Внимание!!! Пример, написанный в Kylix, прекрасно работает в
Delphi
Horrific aka Фленов Михаил (smirnandr@mail.ru)
http://www.cydsoft.com/vr-online/
Так уж получается в последнее время, что на Delphi я пишу проги-приколы,
а с помощью Kylix я рассказываю про сетевой кодинг. Сегодня я
не буду нарушать эту традицию, и в этой статье тебя ожидает рассказ
про UDP протокол. По рубрике Hack-FAQ я понял, что не все еще
профиксили, что это за зверь.
ТЕОРИЯ ПРОТОКОЛА
На данный момент существует два основных и самых распространенных
протокола - TCP и UDP.
Раньше был еще очень распространен IPX, который использовала
фирма Novell. Но на данный момент он отходит, и уже редко увидишь
такого зверя. Только на старых системах можно увидеть IPX. Большинство
остальных протоколов, которые ты знаешь (FTP, HTTP, POP3, SMTP
и дальше в том же духе), работают поверх TCP или UDP.
Что это значит - "поверх другого протокола"? В TCP реализованы
основные функции для работы с сетью. Он умеет устанавливать соединение
с удаленным компом, передавать и принимать данные и проверять
правильность получения серваком отправленных пакетов. Теперь
мы хотим создать протокол для передачи файлов (FTP). Для этого
берем TCP, наделяем его нужными нам возможностями и - получите-распишитесь.
Вот и получается, что FTP работает через (поверх) протокола TCP.
Если бы мы захотели создать FTP с чистого листа, то нам пришлось
бы заново реализовывать функции установки соединения и передачи
данных. А так нам нужно только подготовить данные в спецформате
(протокола FTP) и отдать их протоколу TCP, и он сам уже установит
соединение и отдаст эти данные куда надо.
Ели ты помнишь самую первую мою статью в рубрике "кодинг", где
я рассматривал основы, то уже заметил аналогию с объектно-ориентированным
программированием. Именно по такому принципу работает сеть. Все
это дело стандартизировано, и если хочешь узнать подробнее, то
почитай какую-нибудь доку про модель OSI (Open Systems Interconnection)
и ее семь уровней (тут опять могу отослать на свой сайт, где
я уже все подробно описал). Эта тема довольно интересна, и в
любом случае желательно знать устройство протоколов.
ПРОТОКОЛ UDP
Протокол UDP очень похож на TCP. В нем также реализованы возможности
передачи данных, но он не устанавливает соединения и не поддерживает
целостности передаваемых данных. Протокол просто открывает порт,
выплевывает туда порцию данных и даже не волнуется о том, дошли
они к получателю или нет. Поэтому UDP работает намного быстрей.
Если ты захочешь работать с этим протоколом, то проверку правильности
получения данных придется реализовывать самому. Так что для передачи
файлов или другой инфы большого размера ты должен выбрать TCP.
Ну а для чата, который мы сегодня напишем, более удобным вариантом
будет UDP. Он очень быстрый и при маленьких сообщениях очень
эффективен.
В Delphi для работы с UDP протоколом хорошо подходит библиотека
Indy. Мы ее уже использовали, когда писали пример утилиты WhoIs.
Сегодня снова возвращаемся к ней.
БУДЬ ГОТОВ!
С теорией покончено, давай переходить к написанию чата. На этот
раз я написал его в Delphi и потом протестировал в Kylix. В обеих
средах чат откомпилировался без проблем. Так что не имеет значения,
что будешь использовать ты.
Разомни пальцы, мышку, клаву и запусти Delphi. Сейчас мы приступим
к моему любимому занятию.... Да нет, не к сексу. Я его тоже люблю,
но сегодня мы займемся кодингом, а секс оставим на ночь :).
На форме мне понадобятся:
1. Компонент TMemo. Его можно растянуть почти по всей форме.
2. Компонент TEdit, в который мы будем писать отправляемое сообщение.
3. Кнопка TButton, по нажатию которой сообщение будет отсылаться.
Для работы с портами нам нужны компоненты idUDPClient с закладки
"Indy Clients" и idUDPServer с закладки "Indy Servers". Брось
по одному такому компоненту на форму.
Теперь нужно настроить протокол UDP. Первое что сделаем - выберем
любой порт от 1 до 65 тысяч, через который будет происходить
связь. Я решил выбрать 11245 (ты можешь выбрать любое другое).
Установи это значение у свойства Port компонента idUDPClient
и у свойства DefaultPort компонента idUDPServer. Это заставит
клиента и сервера работать на одном и том же порту, а значит
может осуществиться связь.
ЗАПОМНИ!!! Порты протокола UDP не пересекаются с портами TCP.
Это значит, что TCP порт 80 не равен UDP порту 80.
Теперь у клиента (idUDPClient) нужно указать свойство Host. Сюда
записывается IP адрес компа, которому будут отправляться сообщения.
Но у нас чат и сообщения должны получать все пользователи в сетке,
запустившие прогу. Поэтому, чтобы не было проблем, желательно
установить у обоих компонентов свойство BroadcastEnabled в true.
А вместо конкретного IP адреса использовать широковещательный
(такой адрес, который получают все). Если у тебя в сетке используются
адреса типа 192.168.100.х, то для тебя широковещательный адрес
будет 192.168.100.255 (последний октет меняем на 255). Приготовления
окончены, можно кодить.
ШКОДИНГ
Создай обработчик события OnClick для кнопки и напиши там следующий
код:
procedure TForm1.Button1Click(Sender: TObject);
begin
IdUDPClient1.Send(Edit1.Text);
end;
Здесь всего одна строчка, которая отправляет с помощью UDP клиента
содержимое строки ввода (компонента Edit1).
Теперь нужно научить UDP сервер получать эту инфу. Для этого
создай обработчик события OnUDPRead для компонента IdUDPServer.
В нем напиши содержимое листинга 1, а я попытаюсь доходчиво описать
происходящее. У процедуры-обработчика события есть три параметра.
Первый присутствует во всех обработчиках и ничего интересного
для нас сегодня в себе не несет. Второй - это данные, которые
получены из сети. Третий - тут хранится информация о том, откуда
пришли данные.
Итак, полученные данные хранятся во втором параметре. Они приходят
к нам как простой неформатированный поток TStream. Чтобы удобней
было работать с данными, их лучше перегнать в строковый поток
TStringStream. Ты думаешь, это неудобно? Неудобно на потолке
сексом заниматься, одеяло падает. А также когда соседские дети
на тебя похожи. А тут все удобно. А вдруг ты передаешь не текст,
а картинку, и компонент форматнет ее в текст? Вот это уже будет
не неудобно, а Смотри, как легко все превращается в текст. В
обработчике я объявил одну переменную StringFormatedStream типа
TStringStream (строковый поток). Первой строкой кода я его инициализирую.
Во второй строчке я копирую в строковый поток данные из простого
неформатированного потока. Все!!! Теперь переданный мне текст
находится в свойстве DataString строкового потока StringFormatedStream.
Я смело могу выводить этот результат в компонент Memo.
Но мы же пишем чат, и желательно еще и выводить информацию о
том, кто сказал этот текст. Для примера я вывожу IP адрес отправителя
данных, который находится в свойстве PeerIP третьего параметра
ABinding. Но это только для примера и в реальной ситуации это
некрасиво. Поэтому ты можешь добавлять имя отправителя сразу
в текст отправки. Это значит, что по нажатию кнопки отправки
сообщения нужно изменить код следующим образом:
IdUDPClient1.Send('Сюда помести имя отправителя'+Edit1.Text);
Можно дать возможность юзверю вводить имя в отдельной строке
ввода Edit2. В этом случае код будет таким:
IdUDPClient1.Send(Edit2.Text+' '+Edit1.Text);
Все!!! Кодинг окончен.
COMPLETE!
Если у тебя все получилось, то можешь запустить прогу и пообщаться
с самим собой. Ну а если благодаря Х ты уже осетенил свой дом,
район, город (нужное подчеркнуть), то устанавливай свой чат всех
сетянам и общайся. Чат простой, но очень быстрый и абсолютно
не нагружает систему, в отличие от чатов на основе TCP.
Если у тебя возникли проблемы с компиляцией, то Delphi (как и
у меня) забыл добавить к проекту модуль idSocketHandle. Допиши
его в раздел uses, и проблемы уйдут.
Дополнительную инфу, как всегда, можно найти на моем сайте http://www.cydsoft.com/vr-online.
Там же можно найти и исходники чата, написанные
мной.
ЛИСТИНГ 1
-------------------------- конец цитирования---------------------------
Как в Делфи заставить компонент TListView при добавлении новых
элементов автоматически прокручиваться для отображения последнего
добавленного элемента. В общем, надо использовать TListView для
записи протокола работы программы и хотелось бы видеть последнее
выполненное действие во время работы программы.
Есть таблица :
<table>
<tr>
<td>
Тут несколько вложенных таблиц, картинок, много текстат и т.д.
</td>
</tr>
</table>
Задача вот в чём.
Как сделать так что бы эта таблица занимала 100% от размера окна?
При том что :
<body marginwidth="0" marginheight="0" leftmargin="0" rightmargin="0"
bottommargin="0" topmargin="0">
Т.Е. таблица должна занимать 100% не от размера содержания окна,
а 100% от всего окна.
Допустим у пользователя окно равно width="780" height="420" если
сделать такой парамерт таблице то естественно она будет занимать
всё окно, но есть и другой пользователь у которого размер онка
- width="1012" height="752" и при этом у второго на окне появится
скрулинг-линия .(та что щас справа). а появление скрулинга не
есть гут...
Так вот есть ли способ реалицовать мою идею...?
Ответ:
<table width=100%>
<tr width=100%>
<td width=100%>
Тут несколько вложенных таблиц, картинок, много текстат и т.д.
</td>
</tr>
</table>
Меня интересует разгон процессора. Что конкретно он из себя предсталяет,
какие последтвия, как его можно осуществить в домашних условиях
и какие для этого есть програмы, можно ли потом все вернуть назад?
Ответ:
Разгон процессора это повышение частоты его работы путем изменения
чатоты FSB (сит. шина) и\или коэф. умножения (на который умножается
частота FSB для получения окончательной частоты процессора -
например для селерон1200 FSB(100MHz)xКоэф.Умнож.(12)=1200MHz)
на частоту выше номинальной (например для того же сел1200 FSB(110MHz)xКУ(12)=1320MHz.
Соответственно с ростом частоты увеличивается и производительность.
Последствия.
1.Перегрев процессора приводит к повышенному износу, или (в критических
случаях) к выгоранию.
2.В большинстве случаев частота работы AGP\PCI\ISA устройств
( в том числе контроллера жестких дисков) и памяти связана с
частотой FSB, т.к. частота их работы получается делением частоты
FSB на опред. коэффициент.Повышение частоты работы этих устройств
свыше номинального может привести дибо к полной неработоспособности
компьютера (например он просто не загрузится) или к появлению
массовых ошибок.Также, в отношении контроллера жестких дисков,
можно потерять все записанное на ж. диске (хотя диск физически
будет цел).
Как осуществить.
Читайте руководство к сист. плате - каким образом менять частоту
FSB и коэф. умножения - это в секции посвященной установке процессора
(в вашем случае, т.е. для платы ПеньПро).Скорее всего у вас для
этого необходимо переставлять перемычки на сист. плате , а в
совр. платах достаточно настроить все в BIOS Setup. Посмотрите,
поддерживает ли ваша сист. плата плавное изменение частоты FSB,
плавное изменение напряжения питания процессора. Если нет - скорее
всего ничего не получится.Просто из-за отсутствия
соотв. функций на плате.
(Вообще-то разгон ППро представляется мне несколько сомнительным
- для разгона он не слишком подходит, кристалл большой, техпроцесс
не меньше 0.25мкм -греться будет).
В общем делаете так.
Изменяете частоту FSB на, скажем, 5-10 MHz (Если плата позволит).
(Можно изменить коэф. умножения - но разгон по щине предпочтительнее,
кроме того в ППро КУ может быть просто заблокирован - и изменить
его не удасться).
Запускаете компьютер. Если экран монитора черный и ничего не
происходит - выключайте, разгон не удался. Если доходит хотя
бы до чего-нибудь (например до надписи starting windows) а дальше
все останавливается - выключайте компьютер и повышайте напряжение
питания процессора на 0,1В.
Снова включайте.Если ситуация не изменится - повысьте еще на
0,1В. (Но больше уже не повышайте - проц выгорит).
Допустим виндовс загрузилась. Потестируйте. Сожмите ВинРАРом
0,5-1ГБ файлов (сжимаемых! -мп3 имли JPEG не годятся) с максисмальной
степенью сжатия. Разархивируйте. И так несколько раз на предмет
обнаружения ошибок в работе программы. Запустите какую-нибудь
3D игрушку (quake например) - поиграйте часик, два.
Если глюков нет - все ОК.
Операционная система: Win2k
Как отключить LM хэш и использовать вместо него NTLM?
Ответ:
Локальная политика безопасности, параметры безопасности, локальные
политики, параметры безопасности, =Сетевая безопасность: уровень
проверки подлинности Lan Manager= там выберишь то что нужно.
Марка модема:U.S.Robotics 56k PCI Voice PID: 3298
Тип (внутр/внешн): Внутр
Как использовать режим спикерфона? На 100% уверен, что всё делаю
правильно. Соединяю гнездо CD-in на звуковой карте с гнездом
TAD на модеме шнуром от CD-Rom'а, все ползунки в регуляторе громкости
ставлю на максимум. В режиме спикерфона могу слушать линию через
колонки, но через микрофон меня не слышат. Причём, регистры,
отвечающие за громкость в этом режиме стоят в значении 128. Провод
исправен. Слышал, что в некоторых звуковухах "забывают" вывести
вход микрофона на гнездо CD-in. Как проверить без осциллографа.
В чём ещё может быть загвоздка?
Ответ:
Осцилограф не нужен. Наличие звука можно определить вольтметром
переменного тока. Когда идёт звук стрелка заметно шевелится.
CD-in на звуковой плате - это стерео-вход (2 контакта заземлены,
правый и левый). И выход туда не "забывают" вывести, его там
просто нет ни на одной из звуковух. Стандарт, однако!Поэтому
через микрофон тебя не услышат. Ищи где брать выход (можно методом
научного тыка или всё-таки почитать инструкцию к
звуковухе) и куда его направлять (распайку звукового контакта
модема).
Почему не получается открыть удаленную страницу для чтения?
Пробовал делать так:
$f_address = fopen("http://www.yahoo.com/","r");
или
$f_address = fopen("http://www.mysite.com/index.html","r");
Результат один и тот же для различных адресов.
Ответ:
Разве? У меня вроде все заработало.
$f_address = fopen("http://www.ya.ru/","r");
$f = fread($f_address, 1024);
echo $f;
Я не понимаю как происходит процесс сканирования. объясните!
Ответ:
Сканирование - это чисто физических процесс основанный на том
факте, что степень отражения лучей разной частоты зависит от
свойств некоторой поверхности и воспринимается людьми как цвет.
Сканируемую поверхность всю одинаково освещают, а в фиксированных
точках (их количество зависит от выставленного разрешения рисунка)
световой элемент засекает, сколько и каких волн отразилось от
этой точки. В результате сканирования мы получаем числовые характеристики
заданного количества точек, которые легко преобразовать ( в удар
по люминсценту или капнуть чернил, чтобы отражались почти те
же волны, что и в исходной точке) для, того чтобы получить изображение
на экране (про разрешение экрана - помните?- 800х600, 1024х768...
ТОЧЕК) или напечатать на принтере (здесь разрешение измеряется
в точках на линейный дюйм, т.е. 600dpi = dot per inch это 600
точек на 25.4 мм).
В наличии есть несколько файлов проименованые следующим образом:
ram1.htm ... ram32.htm
требуется закачать файлы на сайт нажатием одной командной кнопки
Ответ:
Используй элемент Internet Transfer (Inet1). Пусть даны: имя
пользователя (учетная запись) UserName1, пароль Password1, хост
ToHost1, куда нужно закачать файлы, директория Dir1 (например,
temp/) - виртуальный или физический каталог, куда качаем файлы
на хосте, и главная командная кнопка CMD1. (работает, если файлы
находятся в пути App.Path\ , если другой, то измени код)
Вот код для кнопки CMD1:
Как написать веб-форму, чтобы с неё можно было отправлять письма?
То есть простейший e-mail клиент. Aдреса будут доставаться из
Микрософт SQL Server 2000.
Ответ:
Вот выдрал из HELP'а:
Делаем почтовую программу
Давайте начнем с начала :) POP3 является третье версией POP (Post
Office Protocol). Он (вместе с IMAP) является стандартным почтовым
протоколом для получения почты через Сеть. Вам нужно знать только
несколько вещей: имя пользователя, пароль, и адрес вашего почтового
сервера. Для тех, кто использует dial-up подключение этот адрес
выглядит приблизительно так: pop.ispname.com, где ispname --
имя вашего провайдера. Это все, что вам нужно знать для использования
почты, но если вы хотите что-то написать свое, вам нужно понять,
как это все работает.
Сначала вам нужно подсоединиться к правильному порту. Обычно
это порт 110. Если вы знаете, что ваша ЛС (локальная сеть) использует
другой порт, вам нужно использовать именно его, чтобы все работало.
Для этой статьи я использовал контрол Winsock. Теперь я расскажу
в деталях про то, что делает Winsock. Winsock не предоставляет
нам богатство свойств, но те, что он имеет, плюс методы и события
делают его очень мощным контролом. В этой статья я опишу, как
нужно подсоединяться к серверу через Winsock, но для этого вам
нужно понимание всех комманд, которые я привожу. :)
Неплохой идеей для изучения комманд POP сервера является загрузка
пробной версии MDaemon (http://mdaemon.com).
Это очень неплохая программа, которая позволит вам изучить все
комманды при работе с почтовым сервером.
Комманды
Перед тем, как отсылать данные, вам нужно послать ключевое слово,
например USER, потом значение, а потом vbCrlf. Вот список доступных
комманд:
USER - отсылает имя пользователя
PASS - отсылает пароль
QUIT - завершает сессию соединения
DELE - удаляет сообщение с сервера
RSET - отменяет все изменения, созданные за эту сессию
STAT - получает количество сообщений на сервере
RETR - получает содержимое сообщения
Если комманда проходит успешно, то вы получите ответ +OK от сервера.
Если были какие-либо проблемы, то вы получите сообщение -ER.
Вот пример кода, который отсылает имя пользователя:
Winsock1.SendData "USER Bob" & vbCrlf
Теперь, чтобы определить, что же мы получили от сервера, нам
надо использовать событие Winsock1_DataArrival. Это событие не
доставляет нам никаких данных, оно просто показывает нам, пришло
ли какие данные и их размер. Мы должны использовать метод Winsock
1.GetData чтобы получить данные:
Private Sub WInsock1_DataArrival(ByVal bytesTotal As Long)
Dim strData As String
Winsock1.GetData strData, vbString
WholeThing = WholeThing & strData
ResponseState = Left$(WholeThing, 3)
End Sub
Ошибки
Winsock также предоставляет событие Winsock1_Error. Это событие
предоставляет огромное количество информации про ошибки, помогающие
нам сказать пользователю, что же произошло. Вот пример события
Winsock1_Error event:
Private Sub Winsock1_Error(ByVal Number As Integer, _
Description As String, ByVal Scode As Long, _
ByVal Source As String, ByVal HelpFile As String, _
ByVal HelpContext As Long, CancelDisplay As Boolean)
Msgbox "Error number: " & Number & vbCrlf & _
"Error Description: " & Description
End Sub
Что мне нравится в идеи написания собственного почтового клиента,
так это то, что можно оставлять сообщения на сервере . Это может
выглядить так: вы в дороге, проверяете почту и читаете ее, ответить
на важные сообщения и/или удалить ненужные сообщения на сервере
и отсоединиться, оставив остальную часть почты нетронутой. Это
позволит вам загрузить все сообщения позже, на работе/дома. Вы
можете даже расширить функциональность своей программы, добавив
возможность сохранять вашу почту на HDD, для последующего ее
прочтения.
Соединение
Теперь давайте проверим все на практике. Вставьте нижеприведенный
код; я объясню, что он делает:
Private Function ConnectToPOP(strServer As String, _
strUser As String, strPwd As String)As Boolean
Dim strOut As String
ConnectToPOP = False
Winsock1.Connect strServer, 110 ' Измените порт, если это необходимо
WaitFor 1, strOut
If strOut = "+OK" Then
Winsock1.SendData "USER " & strUser & vbCrlf
Else
ConnectToPOP = False
Exit Function
End If
WaitFor 1, strOut
If strOut = "+OK" Then
Winsock1.SendData "PASS " & strPwd & vbCrlf
Else
ConnectToPOP = False
Exit Function
End If
WaitFor 1, strOut
If strOut = "+OK" Then
ConnectToPOP = True
Else
ConnectToPOP = False
End If
End Function
Запомните, после того, как мы отправим какие-либо данные, нам
нужно подождать ответа. Я использовал для этого процедуру WaitFor.
Сначала мы подсоединяемся, используя метод Winsock1.Connect,
указывая имя сервера и порт. Потом мы ждем ответа, и проверим,
чтобы ответ был +OK. Если ответ +OK, то мы отсылаем имя пользователя,
используя комманду USER. И наконец, если ответ +OK, то мы отсылаем
пароль. И если все это прошло успешно, то мы подключились к серверу!
А за счет чего живут всякие там поисковые системы типа рамблер,
где-то в журнале вычитал, что их бюджет оставляет около 60 млн.
рублей, от куда это? Какой смысл существовать всяким там бесплатным
хостингам, которые выдают 10 мегов на создание своего сайта,
токо не говорите, что за счет баннеров, не поверю)))
Ответ:
А зря не верите. Именно на показах баннеров они и живут. Их показы
достигают до 5 миллионов в сутки. При цене за тысячу показов
где-то 0.5$ (грубый минимум!!!) можно подсчитать что сумма за
месяц выходит не маленькая :)
Рекомендую заглянуть в раздел "реклама" того же яндекса. Там
подробно описывается где, что, сколько показывается и сколько
это стоит.
Достал я значит скрипты для irc, например такой для скана портов:
/scan {
var %buf1 = 1
while (%buf1 < 65536) {
if (!$portfree(%buf1)) { echo 5 -a Порт %buf1 Открыт }
inc %buf1
}
но как мне его запихнуть в X-Chat2.0.0 он у меня воспринимает
скрипты на Perl и Python. Подскажите что делать:
1. Или как его запихнуть в x-chat по нормальному, а то у меня
руки кривые :)
2. Или как его переделать?
3. Или посоветуйте тагда уж другой irc клиент(но это если первые
два пункта невозможны).
Ответить:
mailto:expert@soobcha.ru?subject=Rass_UQS2Y80N2P
Существуют программы, определяющие активен ли хост. Например
PingNow,она спрашивает адрес сайта и показывает его статус (есть
ли кто-нибудь на нем)
Как написать примерно такую программу на VB 6.0
(Есть текстовое поле с адресом сайта, в другое текстовое поле
записываетс [через определенный промежупок времени] состояние
этого сайта и в третье поле записывается IP или DNS этого сайта)?
Ответить:
mailto:expert@soobcha.ru?subject=Rass_UQR49KR16 [Наверх]
