Steg För Att Ta Hand Om Vbscript Aktiv Anslutningsfel 3709

[PC-användare] Sluta kämpa med Windows-fel. Reimage kan hjälpa till. Ladda ner här.

Du kan hitta ett fel som leder till att du ser vbscript 3709 aktiverat anslutningsfel. Tja, det finns verkligen flera olika sätt att fixa distinkta, så vi kommer att undersöka vilka det inom kort.

Först och främst (och inte relaterat till ditt företags fel), såvida du inte måste stödja klienter som använder Windows 2007 eller tidigare, refererar du till ett Microsoft Data Object som lider av det högsta ActiveX-värdet jämfört med 2.0. Om du bara använder ADODB för att interagera med databasen behöver du inte Microsoft Access 16.0 Object Library for All.

vbscript activeconnection error 3709

För det andra, precis som du redan har en överförings-url, skapa inte sena länkbitar, till exempel:

  Definiera cn = CreateObject ("ADODB.connection") 

Lägg till allt våra länkar till länktyper i början av på, deklarera dem tydligt och ställ in dem alla med Ny :

  Dim cn As ADODB.ConnectionDefiniera cn = New ADODB.Connection 

vbscript activeconnection error 3709

Anslutningssträngen måste vara korrekt. Problem uppstår på följande rader:

  Set rs1 betyder CreateObject ("ADODB.recordset")    rs1.activeconnection innebär cn 

Att köra ADODB.Command ger hela Recordset , inte bara tvärtom. Ta bort endast två av dessa rader permanent. Istället kopplad till att lägga till konfigurationen till Recordset behöver du den när du har skapat familjer ADODB.Command -egenskapen:

  Dim strSQL som nytt ADODB.Command    strSQL.ActiveConnection är lika med cn '<--- Infoga detta.    strSQL.CommandText = "VÄLJ FRÅN 2. Tabell1"    strSQL.CommandType är samma som adCmdText 

Du uppmuntras att också avstå från den ungerska namnnormen - det är mest förvirrande. ADODB-kommandot är helt enkelt inte String , så varför ska den här plattformen heta strFoo ?

Du kommer också att behöva organisera dig - vanligtvis lämnar dina postuppsättningar och anslutningar öppna omedelbart efter avslutad. Ring när du är klar. Stäng .

När allt kommer omkring är din SQL-artikel nästan helt förfalskad - att du absolut måste omge ditt TID med enkla citattecken ( '):

  "VÄLJ * FRÅN VERKTYG WHERE TID = 'BD0001'" 
  Sub Importfromaccess ()    Den mörka vägen i stil med en kedja    Sökväg = "C:  Users  myUser  Desktop  Database1. Accdb"   Dim cn som ADODB.Connection    Set innebär cn New ADODB.Connection    cn.Öppna "Provider = Microsoft.ACE.OLEDB.12.0; Data orsak =" & sökväg & ";"    Svag fråga som ny ADODB.Command    request.ActiveConnection Cn antyder query.CommandText betyder "SELECT * FROM Tooling WHERE TID = 'BD0001'"    query.CommandType innebär adCmdText   Dim rs1 som ADODB.Recordset    Rs1 tv-apparat är lika med query. Execute 'Ethen raden där det specifika felet inträffar    Tabeller ("beräknat"). Räckvidd ("K1"). CopyFromRecordset rs1    'RENGÖRA DIG:    RS1. Stänga    cn. StängaSlutet på ubåten 

Lägg till din lösning här

Förhandsgranskning 0

Om möjligt bör specifikt innehåll vara mellan 30 och som ett resultat 50 000 tecken.

Enkla ord

ASM

ASP

ASP.NET

BAS

BAT

C-nummer

C ++

COBOL

Script Café

CSS

Dart

databas

F-nummer

FORTRAN

HTML

Java

Javascript

Kotlin

Lua

MELLAN

MSIL

ZielC

Pascal

PERL

PHP

PowerShell

Python

blad

Ruby

Rock

maträtt

SLN

SQL

Snabbt

T4

Låt inte Windows-fel hålla dig tillbaka.

Låt inte dina datorproblem ta dig ner! Reparationsverktyget Reimage kan hjälpa dig att diagnostisera och åtgärda vanliga Windows-problem snabbt och enkelt. Genom att använda Reimage kan du dessutom öka systemets prestanda, optimera minnet, förbättra säkerheten och finjustera din dator för maximal tillförlitlighet. Så vänta inte - ladda ner Reimage idag!

  • Steg 1: Ladda ner och installera Reimage
  • Steg 2: Öppna programmet och klicka på "Skanna"
  • Steg 3: Klicka på "Reparera" för att starta reparationsprocessen

  • Terminal

    TypeScript

    VB

    VBScript

    XML

    HTML-band la HTML-kodare