|
|
|
Что здесь не так, помогите!
|
|||
|---|---|---|---|
|
#18+
Что у мменя здесь не так, помогите начинаещему: use DBI; print "content-type:text/html\n\n"; $method=$ENV{'QUERY_STRING'}; $form_data=~s/%(..)/pack("C", hex($1))/eg; $form_data=~s/\n/\0/g; @pairs=split(/&/, $form_data); foreach $pair(@pairs) { ($name, $value)=split(/=/, $pair); $form{name}=$value; } my $dbh=DBI->connect("DBI:mysql:database=lib; host=localhost", "root", "") or die $DBI::errstr; if (!$form{'tema'}) { $result="INSERT INTO tema (kod, tema) VALUES ('', '$value{'tema'}')"; print<<Ok <html> <body>Запись в базу прошла успешно</body></html> Ok ; } где kod автоинкрементное поле tema символьное Заполняя форму и вызывая этот скрипт, сначала браузер предлагает сохранить или открыть данный скрипт, а потом быстро выполняет ничего на екран не выводя, и даже запись в базу не вставляет. Помогите плиз. И второе: где можно взять хорошую литературу по перлу , в часности для работы c бд в инете? Спасибо ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.11.2002, 12:21 |
|
||
|
Что здесь не так, помогите!
|
|||
|---|---|---|---|
|
#18+
INSERT INTO tema (kod, tema) VALUES ('', '$value{'tema'}')"; где kod автоинкрементное поле Ну так и пишите INSERT INTO tema ( tema) VALUES ( '$value{'tema'}') ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 15.12.2002, 00:04 |
|
||
|
Что здесь не так, помогите!
|
|||
|---|---|---|---|
|
#18+
Это $result="INSERT INTO tema (kod, tema) VALUES ('', '$value{'tema'}')"; поменяй на $result="INSERT INTO tema (kod, tema) VALUES ('', '".$value{'tema'}."')"; это будет лучше.. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.12.2002, 09:31 |
|
||
|
Что здесь не так, помогите!
|
|||
|---|---|---|---|
|
#18+
Ну во-первых вставь в самое начало стручку с путем к Perl типа #!/usr/local/perl/bin/perl -w Потом тебе правильно Maxx сказал убрать поле kod из INSERT. SmD тоже дело говорит, будет точно известно что будет значение в строковой форме. И попробуй узнать после исполнения запроса значение $mysql_error может ошибки были в ходе работы. И хорошо-бы использовать стандартные средства разбора строк: USE CGI; Ну или как-то так! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.12.2002, 10:18 |
|
||
|
|
start [/forum/topic.php?fid=23&fpage=534&tid=1480697]: |
0ms |
get settings: |
9ms |
get forum list: |
15ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
41ms |
get topic data: |
14ms |
get forum data: |
3ms |
get page messages: |
41ms |
get tp. blocked users: |
1ms |
| others: | 257ms |
| total: | 389ms |
| 0 / 0 |
