Hej!


Jag vill skapa en databaskoppling typ:

<code>
Set ObjConn = Server.CreateObject("ADODB.Connection")
ObjConn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" + Server.MapPath("../tipskungen.mdb")

</code>

Fast inuti ett VBSCRIPT typ:

<code>
<script language="VBScript" type="text/VBScript">



// Godkänner
sub aprove_OnClick

Set ObjConn = Server.CreateObject("ADODB.Connection")
ObjConn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" + Server.MapPath("../tipskungen.mdb")


// Här skall jag sedn köra en sql update-sats


msgbox "Kunden är Underkännd"

end sub
</script>
</code>

Hur löser jag detta... Har exprementerat en hel del mel kommer ingen vart

/Phinala

Du måste köra koden på servern...

Varför köra koden på klienten?

Jag är mest ute för att lära mig... testa mig fram


/phinala

Notera WScript

Set aConnection = WScript.CreateObject("ADODB.Connection")
Set RS = WScript.CreateObject("ADODB.RecordSet")

aConnection.ConnectionString="DATABASE=någon;UID=;PWD=;DSN=någon"
aConnection.Open
RS.Open strSQL, aConnection,1,4

OK...


Jag får prova detta...

vad är aConnection,1,4 ?

/Phinala

Jag får följande meddelande

Körningsfel i Microsoft VBScript: Objekt krävs.: 'WScript'


Min kod ser ut så här:

<code>
<script language="VBScript" type="text/VBScript">

Set aConnection = WScript.CreateObject("ADODB.Connection")
Set RS = WScript.CreateObject("ADODB.RecordSet")

aConnection.ConnectionString= "driver={Microsoft Access Driver (*.mdb)};dbq=" + Server.MapPath("../tipskungen.mdb")
aConnection.Open

strSQL="Select count(*) as Counter from users"

RS.Open strSQL, aConnection,1,4

msbgbox rs("Counter")
</script>

</code>

/Phinala

Du har inte installerat Windows Script på din maskin.
http://msdn.microsoft.com/library/default.asp?url=/downloads/list/webdev.asp

Ang: aConnectio,1,4.. det är vilken cursortype samt vilken locktype Recordsettet ska ha.

adOpenForwardOnly
adOpenKeysset
adOpenDynamic
adOpenStatic

Locktypes
adLockReadOnly
adLockPessimistic
adLockPotimistic
adLockBatchOptimistic

En annan sak, uppdatera dina MDAC drivisar om du inte gjort det.

http://msdn.microsoft.com/library/default.asp?url=/downloads/list/dataaccess.asp

Sen kan du använda dina egna namn på connection mm, jag kopierade bara några gamla namn jag själv använt.

Sen använder du MapPath ser jag, det är ett serverobjekt.
Funkar nog inte i WSH, skriv hela sökvägen istället.

Ok... Det var en del det....

Men jag skall prova......

tack så länge


/Phinala