Avatar billede bestasp Nybegynder
28. december 2001 - 17:45 Der er 8 kommentarer og
1 løsning

Fra Php Til Asp ?

Kan du lave dette script om til asp ?

If (substr($text,0,6) == \"/nick \") {
$text = ereg_Replace(\"/nick \", \"\",$text);
$nick = ChangeNick($id,$text);
writetochat(\"Chatten : \".$userinfo[\"nick\"].\" skiftede navn til \".$nick.\"\\n\");
Avatar billede invisibleman Nybegynder
28. december 2001 - 17:49 #1
If Left(Text, 6) = \"/nick \" Then Text = Right(Text, Len(Text) - 6)
Nick = ChangeNick(ID, Text)
WriteToChat \"Chatten : \" & Userinfo(\"Nick\") & \" skiftede navn til \" & Nick & vbCrLf



MEN $userinfo[\"nick\"] kan ikke oversættes til ASP ... det jeg har skrevet virker ikke ... Userinfo(\"nick\") .. det kan man ikke i ASP
Avatar billede erikjacobsen Ekspert
28. december 2001 - 18:14 #2
den der $userinfo kommer sikkert fra et opslag ien database, så det svarer
til et recordset

  rs(\"nick\")

Jah - måske ..)
Avatar billede bestasp Nybegynder
28. december 2001 - 23:38 #3
Har lige ændret noget iden, og vil gerne spørger om det vil virke på den måde ?

If Left(Request.Form(\"Besked\"), 6) = \"/Nick \" Then
Text = Right(Text, Len(Text) -6)
Nick = Text
SQL = \"Instert into blah (asd,qwe) values(\'\" & Nick & \"\', \'\" & Text\"\')\"
Avatar billede invisibleman Nybegynder
28. december 2001 - 23:46 #4
If Left(Request.Form(\"Besked\"), 6) = \"/Nick \" Then
Text = Right(Text, Len(Text) -6)
Nick = Text
SQL = \"Instert into blah (asd,qwe) values(\'\" & Nick & \"\', \'\" & Text\"\')\"

Du mangler et & mellem Text og \"\')\" ... og så er Nick = Text unødvendig ...

If Left(Request.Form(\"Besked\"), 6) = \"/Nick \" Then
Text = Right(Text, Len(Text) -6)
SQL = \"Instert into blah (asd,qwe) values(\'\" & Nick & \"\', \'\" & Nick & \"\')\"
Avatar billede bestasp Nybegynder
28. december 2001 - 23:50 #5
men hvad står nick for nu ?
Avatar billede invisibleman Nybegynder
28. december 2001 - 23:53 #6
Nej sludder:

If Left(Request.Form(\"Besked\"), 6) = \"/Nick \" Then
Nick = Right(Text, Len(Text) -6)
SQL = \"Insert into blah (asd,qwe) values(\'\" & Nick & \"\', \'\" & Nick & \"\')\" 

SÅDAN ...
Avatar billede bestasp Nybegynder
29. december 2001 - 00:02 #7
fejl ?
Microsoft VBScript runtime error \'800a0005\'

Invalid procedure call or argument: \'Right\'
Avatar billede bestasp Nybegynder
29. december 2001 - 00:15 #8
har fået det fixet, men nu får jeg
Expected end of statement
Avatar billede bestasp Nybegynder
29. december 2001 - 01:08 #9
har fixet problemet :)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester