Empfohlen: Web -Video -Player -Programmcode Allgemeiner Code Als ich ein Programm für den Kunden machte, stieß ich plötzlich auf ein Problem, dh, wenn der Benutzer der Produktseite eine Video -Wiedergabedatei einreichte, wie man das richtige Videoformat in der eingereichten URL abspielte ... Ich wurde für eine Weile depressiv und dachte über die Idee nach, und dann begann ich, es zu tun ... die Idee ist, den Dateityp zuerst zu bekommen.
Verwenden Sie zunächst den Zugriff, um eine neue Datenbank zu erstellen , den Namen auf Luntan festlegen, den Namen der Datentabelle zu Informationen zu Informationen, die folgenden Felder erstellen: Text, Name, Zeit und den Standardwert von Zeit bis jetzt festlegen
| Das Folgende ist der zitierte Inhalt: <% Setzen Sie com = server.createObject (adodb.Connection) com.opendriver = {Microsoft Access Triver (Luntan.mdb); pwd = Information; dbq = & server.mappath (Luntan.mdb) SQL = SELECT*aus Informationsreihenfolge nach Zeit des Desc Setzen Sie rs = server.createObject (adodb.Recordest) Rs.open SQL, Com, 3,2 Wenn rs.eof oder rs.Bof dann Antwort. Schreiben Sie keinen Kommentar anders rs.movefirst zwar nicht rs.eof. Antwort.Write RS (Name) & veröffentlicht auf & rs (Zeit) & <br> Antwort.Write RS (Text) & <br> <hr> Rs.Movenext Wend AbsolutePosition = n, (n = 1,2,3 ......) Ende wenn %> Als nächstes kommt der Abschnitt "Meldung des Benutzers". Angenommen, die Forum -Seite ist dann Information.asp, dann <formmethode = post action = Information.asp> Name: <Eingabe type = text size = 12 name = name> <br> Hinterlassen Sie eine Nachricht: <textarea cols = 30 row = 4 name = text> </textArea> <br> <Eingabe type = value = surven> </form> |
Der letzte Teil besteht darin, die vom Benutzer übermittelten Formulardaten in die Datenbank aufzunehmen.
Das Folgende ist der zitierte Inhalt: <% Wenn Anforderung (Text) <> leer und anfordert (Name) <> leer, dann leeren Sie dann Setzen Sie ComM = Server.createObject (adodb.Connection) COB.OPENDRIVER = {Microsoft Access Treiber (*. Mdb)}; pwd = Information; Dbq = & server.mappath (luntan.mdb) SQL = SELECT*Aus Informationen Setzen Sie rsb = server.createObject (adodb.recordset) RSB.Open SQL, Comb, 3,2 rsb.addnew RSB (Text) = Anfrage (Text) RSB (Name) = Anfrage (Name) rsb.update Ende wenn %> |
Share: Zwei interessante Besucher -Gegenstände Als unverzichtbarer Bestandteil der Website kann der Besucherschalter nicht nur die Anzahl der Besuche der Website aufzeichnen, sondern auch die Spaß und die Sehbarkeit der Webseite durch ein lebhaftes und interessantes Design verbessern, wodurch der Besucher eine Landschaft auf der Webseite entspricht. Das Folgende sind zwei einfache Designspaß