Opret uden redirect

Prøv at kaste noget kode....

Ja det kan du da...

<%
Conn.Open 'En connection string til din mySQL'

SQL = "INSERT INTO tabelnavn (IDbruger, IP, Dato, URL) VALUES ('" & brugerID & "', '" & IPadresse & "', ........"

conn.execute(SQL)

%>

resteen af siden her..

når jeg har åbnet med en conn.string tidligere skal jeg så gøre det igen?
Jeg bruger denne include-fil:
<%
' FileName="Connection_ado_conn_string.htm"
' Type="ADO"
' DesigntimeType="ADO"
' HTTP="true"
' Catalog=""
' Schema=""
Dim MM_gafbu_STRING
MM_gafbu_STRING = "DRIVER={MySql}; SERVER=xxxxx; DATABASE=xxxxxx; UID=xxxxxx;PWD=xxxxxxx"
%>

Du behøver kun havde en connection til databasen.
Så hvis du har en connection er det fint.

Dette er nu min kode:
<%
SQL = "INSERT INTO tabelnavn (IDbruger, IP, Dato, URL) VALUES ('" & IDbruger & "', '" & IP & "','" & Dato & "','" & URL & "')"
Conn.execute(SQL)
%>

Der kommer en fejl ved Conn.execute(SQL)

er det mon min connectionstring der alligevel mangler?

Hvilken fejl kommer?

Når det MySQL vil den havde dato formatet i yyyy-mm-dd hvis det er en kolonne af typen date.

Hedder connection objectet conn ?

Kollonne dato er text netop for at undgå problemet med format. jeg tror ikke det er her problemet ligger.
Fejlen hedder:
Microsoft VBScript runtime error '800a01a8'

Object required: ''

/vidensbank/main.asp, line 419

Jeg ved ikke hvad connection objectet hedder! Hvor finder jeg det?
Alle felter er skjulte, hvsi det har nogen betydning. Hele koden ser som den ser ud nu:
<form name="form1" method="post" action="">
<input name="IDbruger" type="hidden" id="IDbruger" value="Test_bruger">
<input name="Dato" type="hidden" id="Dato" value="Test_Dato">
<input name="IP" type="hidden" id="IP" value="Test_IP">
<input name="URL" type="hidden" id="URL" value="Test_URL">
</form>
               
<%
SQL = "INSERT INTO LogData (IDbruger, IP, Dato, URL) VALUES ('" & IDbruger & "', '" & IP & "', '" & Dato & "', '" & URL & "')"
Conn.execute(SQL)
%>

Behøver jeg overhovedet de skjulte felter. er det ikke nok at definere dem som du har gjort i SQL-strengen?

Du skal ikke lave en form hvis det er på samme side, så skal du gøre sådan her:

<%
IDbruger = "Test_bruger"
Dato = "Test_Dato"
IP = "Test_IP"
URL = "Test_URL"

SQL = "INSERT INTO LogData (IDbruger, IP, Dato, URL) VALUES ('" & IDbruger & "', '" & IP & "', '" & Dato & "', '" & URL & "')"
Conn.execute(SQL)
%>

Du skal kigger efter noget som hedder

XXXX.open MM_gafbu_STRING

Jeg kan ikke finde den!?
Der er ikke umidddelbart noget der passer på din beskrivelse.

Kan man ikke definere den igen?
Hvad kan man gøre?
Jeg er nødt til at holde nu. Vender tilbage senere iaften.

Så kan du lave en connection:


<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open MM_gafbu_STRING

IDbruger = "Test_bruger"
Dato = "Test_Dato"
IP = "Test_IP"
URL = "Test_URL"

SQL = "INSERT INTO LogData (IDbruger, IP, Dato, URL) VALUES ('" & IDbruger & "', '" & IP & "', '" & Dato & "', '" & URL & "')"

Conn.execute(SQL)
Conn.Close
%>

JUBIIIIIIII det virker. tak for hjælpen