Syntax fel i INSERT INTO-uttryck

Vad är fel på den här:

Insert Into Domain
(DomPaket, DomName, DomSiteID, DomPath, DomWww, DomData, DomStats, DomAnonym, DomAnonPass, DomAdmin, DomAdminPass, DomEpUser, DomEpAccounts, DomEpUtrymme, DomEpPass, DomFtpAddress, DomFtpUser, DomFtpPass, DomUtrymme)
VALUES('Erbjudande 1', 'www.domain.com', '3', 'www.domain.com', 'www', 'data', 'stats', 'www.domain.com', 'webbat', 'domain.com', '45433bj353', 'webmaster@domain.com', '15', '25600', '45433bj353', 'ftp.domain.com', 'domain1', '45433bj353', '40960')

Det är vad jag får när jag skriver ut:

    'If UseFolders.Value = vbChecked Then
        Dim roten As String
        roten = Harddisk & txtRoot.Text
        iaRoot = ", DomPath, DomWww, DomData, DomStats"
        ibRoot = ", '" & roten & "', '" & txtWww.Text & "', '" & txtData.Text & "', '" & txtStats.Text & "'"
    'End If
    'If UseUserAccounts.Value = vbChecked Then
        iaKonto = ", DomAnonym, DomAnonPass, DomAdmin, DomAdminPass"
        ibKonto = ", '" & txtWebbkonto.Text & "', '" & txtWebbPass.Text & "', '" & txtAdminKonto.Text & "', '" & txtAdminPass.Text & "'"
    'End If
    'If UseMail.Value = vbChecked Then
        iaMail = ", DomEpUser, DomEpAccounts, DomEpUtrymme, DomEpPass"
        ibMail = ", '" & txtEmail.Text & "', '" & txtAccounts.Text & "', '" & Mailutrymme.Text & "', '" & txtEmailPass.Text & "'"
    'End If
    'If UseFtp.Value = vbChecked Then
        iaFtp = ", DomFtpAddress, DomFtpUser, DomFtpPass, DomUtrymme"
        ibFtp = ", '" & Replace(damainnamnet.Text, "www.", "ftp.") & "', '" & txtFtpUser.Text & "', '" & txtFtpPass.Text & "', '" & txtFtpKvot.Text & "'"
    'End If
    'If UseIIS.Value = vbChecked Then
        Dim SQLlist As String
        SQLlist = "Insert Into Domain"
        SQLlist = SQLlist & "(DomPaket, DomName, DomSiteID" & iaRoot & iaKonto & iaMail & iaFtp & ")"
        SQLlist = SQLlist & "VALUES('" & UserKonto.Text & "', '" & damainnamnet.Text & "', '3'" & ibRoot & ibKonto & ibMail & ibFtp & ")"
        'KundOvrigt.Text = SQLlist
        GetConn.Execute (SQLlist)
    'End If

Fel:
Syntax fel i INSERT INTO-uttryck

Det är en Access databas

Är alla fälten av sträng-typ?

japp

Hittade felet! Det var kopplingen till DB:n hade satt dit fel drivrutin :r Använder så sällan Access